branch: externals/compat
commit 4a6ffe34538cbd5aa8df3fef63876b27281e49ab
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
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
