diff options
Diffstat (limited to 'src/casetab.c')
| -rw-r--r-- | src/casetab.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/casetab.c b/src/casetab.c index 5ae4ee2b5f2..ca8979bdb3c 100644 --- a/src/casetab.c +++ b/src/casetab.c @@ -254,13 +254,13 @@ init_casetab_once () { register int i; Lisp_Object down, up; - Qcase_table = intern ("case-table"); + Qcase_table = intern_c_string ("case-table"); staticpro (&Qcase_table); /* Intern this now in case it isn't already done. Setting this variable twice is harmless. But don't staticpro it here--that is done in alloc.c. */ - Qchar_table_extra_slots = intern ("char-table-extra-slots"); + Qchar_table_extra_slots = intern_c_string ("char-table-extra-slots"); /* Now we are ready to set up this property, so we can create char tables. */ @@ -298,7 +298,7 @@ init_casetab_once () void syms_of_casetab () { - Qcase_table_p = intern ("case-table-p"); + Qcase_table_p = intern_c_string ("case-table-p"); staticpro (&Qcase_table_p); staticpro (&Vascii_canon_table); |