emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/compat 4a6ffe3453 07/12: Reenable test


From: ELPA Syncer
Subject: [elpa] externals/compat 4a6ffe3453 07/12: Reenable test
Date: Wed, 4 Jan 2023 12:57:36 -0500 (EST)

branch: externals/compat
commit 4a6ffe34538cbd5aa8df3fef63876b27281e49ab
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Reenable test
---
 compat-tests.el | 17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

diff --git a/compat-tests.el b/compat-tests.el
index 1d15069ccb..737f60640d 100644
--- a/compat-tests.el
+++ b/compat-tests.el
@@ -1702,15 +1702,14 @@
 ;;           (compat-sort (directory-files-recursively "." "make\\|copying") 
#'string<)
 ;;           '("./.github/workflows/makefile.yml" "./COPYING" "./Makefile"))))
 
-;; TODO fix broken test
-;; (defvar compat-local-a nil)
-;; (defvar compat-local-b nil)
-;; (defvar compat-local-c nil)
-;; (ert-deftest setq-local ()
-;;   (compat-call setq-local compat-local-a 1 compat-local-b 2 compat-local-c 
3)
-;;   (should-equal compat-local-a 1)
-;;   (should-equal compat-local-b 2)
-;;   (should-equal compat-local-c 3))
+(defvar compat-local-a nil)
+(defvar compat-local-b nil)
+(defvar compat-local-c nil)
+(ert-deftest setq-local ()
+  (compat-call setq-local compat-local-a 1 compat-local-b 2 compat-local-c 3)
+  (should-equal compat-local-a 1)
+  (should-equal compat-local-b 2)
+  (should-equal compat-local-c 3))
 
 (provide 'compat-tests)
 ;;; compat-tests.el ends here



reply via email to

[Prev in Thread] Current Thread [Next in Thread]