From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 28 Jun 2005 02:27:46 +0000 (+0000)
Subject: (Fdefvar): Improve error message.
X-Git-Tag: emacs-pretest-22.0.90~8610
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3a1f1d792b24eb525ff880d446ccdb730c3f9a19;p=emacs.git

(Fdefvar): Improve error message.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index be7c4f54855..ee669ce31ae 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2005-06-27  Richard M. Stallman  <rms@gnu.org>
+
+	* eval.c (Fdefvar): Improve error message.
+
 2005-06-27  YAMAMOTO Mitsuharu  <mituharu@math.s.chiba-u.ac.jp>
 
 	* macterm.c [USE_CARBON_EVENTS] (mac_convert_event_ref): Fix last
diff --git a/src/eval.c b/src/eval.c
index 589bf593f15..26ed0ef53c4 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -807,7 +807,7 @@ usage: (defvar SYMBOL &optional INITVALUE DOCSTRING)  */)
 
   sym = Fcar (args);
   if (SYMBOL_CONSTANT_P (sym))
-    error ("Cannot defvar a constant symbol: %s",
+    error ("Constant symbol `%s' specified in defvar",
            SDATA (SYMBOL_NAME (sym)));
 
   tail = Fcdr (args);