# HG changeset patch
# User Luc Teirlinck <teirllm@auburn.edu>
# Date 1069472904 0
# Node ID 988e1d16a97124c06024a796ff3e24cd111e0a71
# Parent  e5aa31618adecd765689774bcb5d09bc1acf1eb8
(Fassq, Fassoc, Frassq, Frassoc): Doc fixes.

diff -r e5aa31618ade -r 988e1d16a971 src/fns.c
--- a/src/fns.c	Sat Nov 22 03:42:24 2003 +0000
+++ b/src/fns.c	Sat Nov 22 03:48:24 2003 +0000
@@ -1494,7 +1494,7 @@
 
 DEFUN ("assq", Fassq, Sassq, 2, 2, 0,
        doc: /* Return non-nil if KEY is `eq' to the car of an element of LIST.
-The value is actually the element of LIST whose car is KEY.
+The value is actually the first element of LIST whose car is KEY.
 Elements of LIST that are not conses are ignored.  */)
      (key, list)
      Lisp_Object key, list;
@@ -1551,7 +1551,7 @@
 
 DEFUN ("assoc", Fassoc, Sassoc, 2, 2, 0,
        doc: /* Return non-nil if KEY is `equal' to the car of an element of LIST.
-The value is actually the element of LIST whose car equals KEY.  */)
+The value is actually the first element of LIST whose car equals KEY.  */)
        (key, list)
      Lisp_Object key, list;
 {
@@ -1595,7 +1595,7 @@
 
 DEFUN ("rassq", Frassq, Srassq, 2, 2, 0,
        doc: /* Return non-nil if KEY is `eq' to the cdr of an element of LIST.
-The value is actually the element of LIST whose cdr is KEY.  */)
+The value is actually the first element of LIST whose cdr is KEY.  */)
      (key, list)
      register Lisp_Object key;
      Lisp_Object list;
@@ -1637,7 +1637,7 @@
 
 DEFUN ("rassoc", Frassoc, Srassoc, 2, 2, 0,
        doc: /* Return non-nil if KEY is `equal' to the cdr of an element of LIST.
-The value is actually the element of LIST whose cdr equals KEY.  */)
+The value is actually the first element of LIST whose cdr equals KEY.  */)
      (key, list)
      Lisp_Object key, list;
 {