(Fsetq): Doc fix.

diff --git a/src/ChangeLog b/src/ChangeLog
index e507754c0ba87ea25711bfc5a8bfbd279f6c4fd0..2a68c99d32876a7c36be529de1cc69bba2213e06 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,9 @@
+2007-07-15  Richard Stallman  <rms@gnu.org>
+
+       * data.c (Fsetq_default): Doc fix.
+
+       * eval.c (Fsetq): Doc fix.
+
 2007-07-11  Jason Rumney  <jasonr@gnu.org>
 
        * makefile.w32-in (LIBS): Include OLE32.

diff --git a/src/eval.c b/src/eval.c
index 6707849a8409394013158d4848bacb4eff89af1f..4ce5c6d05a9f5c4f8083066e68139ba24f39a903 100644 (file)
--- a/src/eval.c
+++ b/src/eval.c
@@ -97,6 +97,7 @@ Lisp_Object Qinhibit_quit, Vinhibit_quit, Vquit_flag;
 Lisp_Object Qand_rest, Qand_optional;
 Lisp_Object Qdebug_on_error;
 Lisp_Object Qdeclare;
+Lisp_Object Qdebug;
 
 /* This holds either the symbol `run-hooks' or nil.
    It is nil at an early stage of startup, and when Emacs
@@ -530,7 +531,7 @@ Thus, (setq x (1+ y)) sets `x' to the value of `(1+ y)'.
 The second VAL is not computed until after the first SYM is set, and so on;
 each VAL can use the new value of variables set earlier in the `setq'.
 The return value of the `setq' form is the value of the last VAL.
-usage: (setq SYM VAL SYM VAL ...)  */)
+usage: (setq [SYM VAL]...)  */)
      (args)
      Lisp_Object args;
 {
@@ -3600,6 +3601,9 @@ before making `inhibit-quit' nil.  */);
   Qand_optional = intern ("&optional");
   staticpro (&Qand_optional);
 
+  Qdebug = intern ("debug");
+  staticpro (&Qdebug);
+
   DEFVAR_LISP ("stack-trace-on-error", &Vstack_trace_on_error,
               doc: /* *Non-nil means errors display a backtrace buffer.
 More precisely, this happens for any error that is handled