Commit 4cb1bcc2 authored by Dave Love's avatar Dave Love
Browse files

(remove, remq): Remove.

parent f1ade7d3
2001-01-05 Dave Love <>
* emacs-lisp/cl-seq.el (remove, remq): Remove.
2001-01-05 Gerd Moellmann <>
* mouse-drag.el (mouse-drag-safe-scroll): Bind
......@@ -322,9 +322,6 @@ This is a destructive function; it reuses the storage of SEQ whenever possible.
Keywords supported: :key :count :start :end :from-end"
(apply 'delete* nil cl-list :if-not cl-pred cl-keys))
(defun remove (x y) (remove* x y :test 'equal))
(defun remq (x y) (if (memq x y) (delq x (copy-list y)) y))
(defun remove-duplicates (cl-seq &rest cl-keys)
"Return a copy of SEQ with all duplicate elements removed.
Keywords supported: :test :test-not :key :start :end :from-end"
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment