diff options
| author | Juanma Barranquero | 2011-06-24 23:25:22 +0200 |
|---|---|---|
| committer | Juanma Barranquero | 2011-06-24 23:25:22 +0200 |
| commit | cd3520a41df21d80a9d894c58af2daba23c8dd24 (patch) | |
| tree | 945eaef322c65471833954ddce161a7a913ee3c8 /src/category.c | |
| parent | 7d0da90e7b98f5c09df82be9985cc27d30adea07 (diff) | |
| download | emacs-cd3520a41df21d80a9d894c58af2daba23c8dd24.tar.gz emacs-cd3520a41df21d80a9d894c58af2daba23c8dd24.zip | |
Move DEFSYM to lisp.h and use everywhere.
Diffstat (limited to 'src/category.c')
| -rw-r--r-- | src/category.c | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/src/category.c b/src/category.c index 23fd874c824..08eadb04730 100644 --- a/src/category.c +++ b/src/category.c | |||
| @@ -453,8 +453,7 @@ void | |||
| 453 | init_category_once (void) | 453 | init_category_once (void) |
| 454 | { | 454 | { |
| 455 | /* This has to be done here, before we call Fmake_char_table. */ | 455 | /* This has to be done here, before we call Fmake_char_table. */ |
| 456 | Qcategory_table = intern_c_string ("category-table"); | 456 | DEFSYM (Qcategory_table, "category-table"); |
| 457 | staticpro (&Qcategory_table); | ||
| 458 | 457 | ||
| 459 | /* Intern this now in case it isn't already done. | 458 | /* Intern this now in case it isn't already done. |
| 460 | Setting this variable twice is harmless. | 459 | Setting this variable twice is harmless. |
| @@ -475,12 +474,9 @@ init_category_once (void) | |||
| 475 | void | 474 | void |
| 476 | syms_of_category (void) | 475 | syms_of_category (void) |
| 477 | { | 476 | { |
| 478 | Qcategoryp = intern_c_string ("categoryp"); | 477 | DEFSYM (Qcategoryp, "categoryp"); |
| 479 | staticpro (&Qcategoryp); | 478 | DEFSYM (Qcategorysetp, "categorysetp"); |
| 480 | Qcategorysetp = intern_c_string ("categorysetp"); | 479 | DEFSYM (Qcategory_table_p, "category-table-p"); |
| 481 | staticpro (&Qcategorysetp); | ||
| 482 | Qcategory_table_p = intern_c_string ("category-table-p"); | ||
| 483 | staticpro (&Qcategory_table_p); | ||
| 484 | 480 | ||
| 485 | DEFVAR_LISP ("word-combining-categories", Vword_combining_categories, | 481 | DEFVAR_LISP ("word-combining-categories", Vword_combining_categories, |
| 486 | doc: /* List of pair (cons) of categories to determine word boundary. | 482 | doc: /* List of pair (cons) of categories to determine word boundary. |