diff options
| -rw-r--r-- | lisp/emacs-lisp/cl-seq.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/cl-seq.el b/lisp/emacs-lisp/cl-seq.el index 443a147b3d2..5c93670be92 100644 --- a/lisp/emacs-lisp/cl-seq.el +++ b/lisp/emacs-lisp/cl-seq.el | |||
| @@ -347,7 +347,7 @@ This is a destructive function; it reuses the storage of SEQ whenever possible. | |||
| 347 | (defun cl--delete-duplicates (cl-seq cl-keys cl-copy) | 347 | (defun cl--delete-duplicates (cl-seq cl-keys cl-copy) |
| 348 | (if (listp cl-seq) | 348 | (if (listp cl-seq) |
| 349 | (cl--parsing-keywords | 349 | (cl--parsing-keywords |
| 350 | (:test :test-not :key (:start 0) :end :from-end :if) | 350 | (:test :test-not :key (:start 0) :end :from-end) |
| 351 | () | 351 | () |
| 352 | (if cl-from-end | 352 | (if cl-from-end |
| 353 | (let ((cl-p (nthcdr cl-start cl-seq)) cl-i) | 353 | (let ((cl-p (nthcdr cl-start cl-seq)) cl-i) |