assoc didn't take :key -- doc fix

[quiroz@cs.rochester.edu]

After applying the patch provided by pc%linus@mitre-bedford.ARPA, it
might pay to go to lsp/setdoc.lsp and fix the documentation string
too.  At the end of this message you can find a suggestion.  Reword
at will and enjoy.

Cesar

*** lsp/setdoc.lsp.~1~	Thu Jun 16 23:42:00 1988
--- lsp/setdoc.lsp	Thu Jun 23 14:25:49 1988
***************
*** 294,302 ****
  used as the error message.  ARGs are arguments to the format string.")
  
  (docfun assoc function "
! Args: (item alist &key (test #'eql) test-not)
! Returns the first pair in ALIST whose car is equal (in the sense of TEST) to
! ITEM.")
  
  (docfun assoc-if function "
  Args: (test alist)
--- 294,302 ----
  used as the error message.  ARGs are arguments to the format string.")
  
  (docfun assoc function "
! Args: (item alist &key (test #'eql) test-not key)
! Returns the first pair in ALIST with a car whose KEY satisfies TEST
! with respect to ITEM.")
  
  (docfun assoc-if function "
  Args: (test alist)