(Fset_char_table_parent): Fix previous change.

[gnu-emacs] / src / alloc.c

diff --git a/src/alloc.c b/src/alloc.c
index 00a03e850d8b22d53b0a21d2278b5f65aa0d932e..a2a2a661e0c982c532b77a455f8afe62038fb7a3 100644 (file)
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -899,7 +899,7 @@ Its value and function definition are void, and its property list is nil.")
       XSETSYMBOL (val, &symbol_block->symbols[symbol_block_index++]);
     }
   p = XSYMBOL (val);
-  p->name = XSTRING (str);
+  p->name = XSTRING (name);
   p->plist = Qnil;
   p->value = Qunbound;
   p->function = Qunbound;