# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 766871648 0
# Node ID 9bfef236ac9ab8329181e5d37368b914945fd7fd
# Parent  3723e842825c9c45d4451f021e5549b100a5bb72
Doc fixes.

diff -r 3723e842825c -r 9bfef236ac9a src/fns.c
--- a/src/fns.c	Wed Apr 20 19:52:37 1994 +0000
+++ b/src/fns.c	Wed Apr 20 19:54:08 1994 +0000
@@ -473,7 +473,7 @@
 }
 
 DEFUN ("member", Fmember, Smember, 2, 2, 0,
-  "Return non-nil if ELT is an element of LIST.  Comparison done with EQUAL.\n\
+  "Return non-nil if ELT is an element of LIST.  Comparison done with `equal'.\n\
 The value is actually the tail of LIST whose car is ELT.")
   (elt, list)
      register Lisp_Object elt;
@@ -626,8 +626,9 @@
 DEFUN ("delete", Fdelete, Sdelete, 2, 2, 0,
   "Delete by side effect any occurrences of ELT as a member of LIST.\n\
 The modified LIST is returned.  Comparison is done with `equal'.\n\
-If the first member of LIST is ELT, there is no way to remove it by side effect;\n\
-therefore, write `(setq foo (delete element foo))'\n\
+If the first member of LIST is ELT, deleting it is not a side effect;\n\
+it is simply using a different list.\n\
+Therefore, write `(setq foo (delete element foo))'\n\
 to be sure of changing the value of `foo'.")
   (elt, list)
      register Lisp_Object elt;