From 43f6fd434dd23fa7202ba95bd1cc3f41234ad609 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sun, 17 Feb 2019 21:35:19 -0800 Subject: * lisp/emacs-lisp/cl-lib.el (cl-endp): Remove stray 'x. --- lisp/emacs-lisp/cl-lib.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/emacs-lisp/cl-lib.el') diff --git a/lisp/emacs-lisp/cl-lib.el b/lisp/emacs-lisp/cl-lib.el index 3756b52feb8..60c52c26ca3 100644 --- a/lisp/emacs-lisp/cl-lib.el +++ b/lisp/emacs-lisp/cl-lib.el @@ -370,7 +370,7 @@ SEQ, this is like `mapcar'. With several, it is like the Common Lisp Signal an error if X is not a list." (if (listp x) (null x) - (signal 'wrong-type-argument (list 'listp x 'x)))) + (signal 'wrong-type-argument (list 'listp x)))) (cl--defalias 'cl-third 'cl-caddr "Return the third element of the list X.") (cl--defalias 'cl-fourth 'cl-cadddr "Return the fourth element of the list X.") -- cgit v1.2.3