From: Ken Raeburn <raeburn@raeburn.org>
Date: Mon, 20 May 2002 08:06:21 +0000 (+0000)
Subject: * minibuf.c (Fread_command, Fread_variable): Use SYMBOL_NAME and
X-Git-Tag: ttn-vms-21-2-B4~14964
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=caa4733e19c3adbd25e864050862806c37719cfd;p=emacs.git

* minibuf.c (Fread_command, Fread_variable): Use SYMBOL_NAME and
assignment instead of XSYMBOL and name field and XSETSTRING.
---

diff --git a/src/minibuf.c b/src/minibuf.c
index 388c912292c..3c7a18d6170 100644
--- a/src/minibuf.c
+++ b/src/minibuf.c
@@ -975,7 +975,7 @@ Prompt with PROMPT.  By default, return DEFAULT-VALUE.  */)
   if (NILP (default_value))
     default_string = Qnil;
   else if (SYMBOLP (default_value))
-    XSETSTRING (default_string, XSYMBOL (default_value)->name);
+    default_string = SYMBOL_NAME (default_value);
   else
     default_string = default_value;
     
@@ -1010,7 +1010,7 @@ A user variable is one whose documentation starts with a `*' character.  */)
   if (NILP (default_value))
     default_string = Qnil;
   else if (SYMBOLP (default_value))
-    XSETSTRING (default_string, XSYMBOL (default_value)->name);
+    default_string = SYMBOL_NAME (default_value);
   else
     default_string = default_value;