summaryrefslogtreecommitdiff
path: root/test/lisp/emacs-lisp/cl-lib-tests.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2022-12-16 19:25:45 +0200
committerEli Zaretskii <eliz@gnu.org>2022-12-16 19:25:45 +0200
commit8e42e20ed7f3c243542acf3ea1cd34e38e36aace (patch)
tree0d3393990e9f70e050a44a9b46317e6d10308ac2 /test/lisp/emacs-lisp/cl-lib-tests.el
parentf4b430140f0866f98bbf18b7094348dc64032813 (diff)
downloademacs-8e42e20ed7f3c243542acf3ea1cd34e38e36aace.tar.gz
Revert "Use equal and member instead of eq and memq"
This reverts commit f4b430140f0866f98bbf18b7094348dc64032813. Please don't install anything on the release branch that is not strictly necessary fro Emacs 29.
Diffstat (limited to 'test/lisp/emacs-lisp/cl-lib-tests.el')
-rw-r--r--test/lisp/emacs-lisp/cl-lib-tests.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/test/lisp/emacs-lisp/cl-lib-tests.el b/test/lisp/emacs-lisp/cl-lib-tests.el
index c3c04b6305e..b19494af746 100644
--- a/test/lisp/emacs-lisp/cl-lib-tests.el
+++ b/test/lisp/emacs-lisp/cl-lib-tests.el
@@ -404,7 +404,7 @@
(ert-deftest cl-lib-nth-value-test-multiple-values ()
"While CL multiple values are an alias to list, these won't work."
:expected-result :failed
- (should (equal (cl-nth-value 0 '(2 3)) '(2 3)))
+ (should (eq (cl-nth-value 0 '(2 3)) '(2 3)))
(should (= (cl-nth-value 0 1) 1))
(should (null (cl-nth-value 1 1)))
(should-error (cl-nth-value -1 (cl-values 2 3)) :type 'args-out-of-range)