From 3a1f1d792b24eb525ff880d446ccdb730c3f9a19 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 28 Jun 2005 02:27:46 +0000 Subject: [PATCH] (Fdefvar): Improve error message. --- src/ChangeLog | 4 ++++ src/eval.c | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) 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 + + * eval.c (Fdefvar): Improve error message. + 2005-06-27 YAMAMOTO Mitsuharu * 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); -- 2.39.2