(remove, remq): Remove.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6f92c3f1ed732dc6585255a8b0fe224809cca34d..6a37e1cc5b7149bac0352caf1bb17aec30639846 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2001-01-05  Dave Love  <fx@gnu.org>
+
+       * emacs-lisp/cl-seq.el (remove, remq): Remove.
+
 2001-01-05  Gerd Moellmann  <gerd@gnu.org>
 
        * mouse-drag.el (mouse-drag-safe-scroll): Bind

diff --git a/lisp/emacs-lisp/cl-seq.el b/lisp/emacs-lisp/cl-seq.el
index 90fba3cfe3ab2a87b49d04289e1bded84e183890..bea91dc309895618ff68c711329af0f372ec1594 100644 (file)
--- a/lisp/emacs-lisp/cl-seq.el
+++ b/lisp/emacs-lisp/cl-seq.el
@@ -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"