Initial revision

[gnu-emacs] / src / lread.c

diff --git a/src/lread.c b/src/lread.c
index 9477a11c421a3e28a1682bdd1672b8543a942357..1f81d76b69cdfb204fc0fd910e2575090d87c44b 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -1,5 +1,6 @@
 /* Lisp parsing and input streams.
-   Copyright (C) 1985, 1986, 1987, 1988, 1989, 1992 Free Software Foundation, Inc.
+   Copyright (C) 1985, 1986, 1987, 1988, 1989,
+   1992 Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
@@ -500,9 +501,11 @@ readevalloop (readcharfun, stream, evalfun, printflag)
 
 #ifndef standalone
 
-DEFUN ("eval-buffer", Feval_buffer, Seval_buffer, 0, 2, "bBuffer: ",
-  "Execute BUFFER as Lisp code.  If BUFFER is nil, use the current buffer.\n\
-Programs can pass argument PRINTFLAG which controls printing of output:\n\
+DEFUN ("eval-buffer", Feval_buffer, Seval_buffer, 0, 1, "",
+  "Execute the current buffer as Lisp code.\n\
+Programs can pass two arguments, BUFFER and PRINTFLAG.\n\
+BUFFER is the buffer to evaluate (nil means use current buffer).\n\
+PRINTFLAG controls printing of output:\n\
 nil means discard it; anything else is stream for print.\n\
 \n\
 If there is no error, point does not move.  If there is an error,\n\