Fix cl-the test

[gnu-emacs] / src / lread.c

diff --git a/src/lread.c b/src/lread.c
index 635862f265482c4225b366aeccfbf2270e5f25c9..4990d25eda1a3f86a61ecc04896951bd97ced252 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -3868,7 +3868,8 @@ DEFUN ("unintern", Funintern, Sunintern, 1, 2, 0,
 The value is t if a symbol was found and deleted, nil otherwise.
 NAME may be a string or a symbol.  If it is a symbol, that symbol
 is deleted, if it belongs to OBARRAY--no other symbol is deleted.
-OBARRAY defaults to the value of the variable `obarray'.  */)
+OBARRAY, if nil, defaults to the value of the variable `obarray'.
+usage: (unintern NAME OBARRAY)  */)
   (Lisp_Object name, Lisp_Object obarray)
 {
   register Lisp_Object string, tem;