(Fread_command, Fread_variable): Fix previous change.
authorRichard M. Stallman <rms@gnu.org>
Sat, 27 Dec 1997 08:16:00 +0000 (08:16 +0000)
committerRichard M. Stallman <rms@gnu.org>
Sat, 27 Dec 1997 08:16:00 +0000 (08:16 +0000)
src/minibuf.c

index 7de73d0..c08e2d3 100644 (file)
@@ -761,7 +761,7 @@ Prompts with PROMPT.  By default, return DEFAULT-VALUE.")
   if (NILP (default_value))
     default_string = Qnil;
   else if (SYMBOLP (default_value))
-    default_string = XSYMBOL (default_value)->name;
+    XSETSTRING (default_string, XSYMBOL (default_value)->name);
   else
     default_string = default_value;
     
@@ -796,7 +796,7 @@ A user variable is one whose documentation starts with a `*' character.")
   if (NILP (default_value))
     default_string = Qnil;
   else if (SYMBOLP (default_value))
-    default_string = XSYMBOL (default_value)->name;
+    XSETSTRING (default_string, XSYMBOL (default_value)->name);
   else
     default_string = default_value;