]> code.delx.au - gnu-emacs/blobdiff - src/casefiddle.c
Add Bug#.
[gnu-emacs] / src / casefiddle.c
index 1a0a62f273c243c06d96c75739f462c7c117d53a..50ad4eeda74898a11b471a9be1f1c97591cec4b0 100644 (file)
@@ -417,8 +417,7 @@ With negative argument, capitalize previous words but do not move.  */)
 void
 syms_of_casefiddle (void)
 {
-  Qidentity = intern_c_string ("identity");
-  staticpro (&Qidentity);
+  DEFSYM (Qidentity, "identity");
   defsubr (&Supcase);
   defsubr (&Sdowncase);
   defsubr (&Scapitalize);