diff options
| author | Ken Raeburn | 2002-05-20 08:06:00 +0000 |
|---|---|---|
| committer | Ken Raeburn | 2002-05-20 08:06:00 +0000 |
| commit | c85d524cf71baa606ac7f08cda970c8a2132708b (patch) | |
| tree | 32b55672e468890f8688e9ea8bd3f86acff1dc40 /src/keymap.c | |
| parent | c60a57d71ca1e32c2fa6d7561bf129e9d4723d7f (diff) | |
| download | emacs-c85d524cf71baa606ac7f08cda970c8a2132708b.tar.gz emacs-c85d524cf71baa606ac7f08cda970c8a2132708b.zip | |
* keymap.c (silly_event_symbol_error, Fsingle_key_description)
(Fdescribe_buffer_bindings): Use SYMBOL_NAME and XSTRING instead
of XSYMBOL and name field.
(describe_command, describe_translation): Use SYMBOL_NAME and
assignment instead of XSYMBOL and name field and XSETSTRING.
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/src/keymap.c b/src/keymap.c index e68210cf81b..775125d6f2d 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -1221,8 +1221,8 @@ silly_event_symbol_error (c) | |||
| 1221 | error ((modifiers & ~meta_modifier | 1221 | error ((modifiers & ~meta_modifier |
| 1222 | ? "To bind the key %s, use [?%s], not [%s]" | 1222 | ? "To bind the key %s, use [?%s], not [%s]" |
| 1223 | : "To bind the key %s, use \"%s\", not [%s]"), | 1223 | : "To bind the key %s, use \"%s\", not [%s]"), |
| 1224 | XSYMBOL (c)->name->data, XSTRING (keystring)->data, | 1224 | XSTRING (SYMBOL_NAME (c))->data, XSTRING (keystring)->data, |
| 1225 | XSYMBOL (c)->name->data); | 1225 | XSTRING (SYMBOL_NAME (c))->data); |
| 1226 | } | 1226 | } |
| 1227 | } | 1227 | } |
| 1228 | 1228 | ||
| @@ -2118,8 +2118,8 @@ around function keys and event symbols. */) | |||
| 2118 | if (NILP (no_angles)) | 2118 | if (NILP (no_angles)) |
| 2119 | { | 2119 | { |
| 2120 | char *buffer | 2120 | char *buffer |
| 2121 | = (char *) alloca (STRING_BYTES (XSYMBOL (key)->name) + 5); | 2121 | = (char *) alloca (STRING_BYTES (XSTRING (SYMBOL_NAME (key))) + 5); |
| 2122 | sprintf (buffer, "<%s>", XSYMBOL (key)->name->data); | 2122 | sprintf (buffer, "<%s>", XSTRING (SYMBOL_NAME (key))->data); |
| 2123 | return build_string (buffer); | 2123 | return build_string (buffer); |
| 2124 | } | 2124 | } |
| 2125 | else | 2125 | else |
| @@ -2736,13 +2736,13 @@ You type Translation\n\ | |||
| 2736 | if (!SYMBOLP (modes[i])) | 2736 | if (!SYMBOLP (modes[i])) |
| 2737 | abort(); | 2737 | abort(); |
| 2738 | 2738 | ||
| 2739 | p = title = (char *) alloca (42 + XSYMBOL (modes[i])->name->size); | 2739 | p = title = (char *) alloca (42 + XSTRING (SYMBOL_NAME (modes[i]))->size); |
| 2740 | *p++ = '\f'; | 2740 | *p++ = '\f'; |
| 2741 | *p++ = '\n'; | 2741 | *p++ = '\n'; |
| 2742 | *p++ = '`'; | 2742 | *p++ = '`'; |
| 2743 | bcopy (XSYMBOL (modes[i])->name->data, p, | 2743 | bcopy (XSTRING (SYMBOL_NAME (modes[i]))->data, p, |
| 2744 | XSYMBOL (modes[i])->name->size); | 2744 | XSTRING (SYMBOL_NAME (modes[i]))->size); |
| 2745 | p += XSYMBOL (modes[i])->name->size; | 2745 | p += XSTRING (SYMBOL_NAME (modes[i]))->size; |
| 2746 | *p++ = '\''; | 2746 | *p++ = '\''; |
| 2747 | bcopy (" Minor Mode Bindings", p, sizeof (" Minor Mode Bindings") - 1); | 2747 | bcopy (" Minor Mode Bindings", p, sizeof (" Minor Mode Bindings") - 1); |
| 2748 | p += sizeof (" Minor Mode Bindings") - 1; | 2748 | p += sizeof (" Minor Mode Bindings") - 1; |
| @@ -2945,7 +2945,7 @@ describe_command (definition, args) | |||
| 2945 | 2945 | ||
| 2946 | if (SYMBOLP (definition)) | 2946 | if (SYMBOLP (definition)) |
| 2947 | { | 2947 | { |
| 2948 | XSETSTRING (tem1, XSYMBOL (definition)->name); | 2948 | tem1 = SYMBOL_NAME (definition); |
| 2949 | insert1 (tem1); | 2949 | insert1 (tem1); |
| 2950 | insert_string ("\n"); | 2950 | insert_string ("\n"); |
| 2951 | } | 2951 | } |
| @@ -2967,7 +2967,7 @@ describe_translation (definition, args) | |||
| 2967 | 2967 | ||
| 2968 | if (SYMBOLP (definition)) | 2968 | if (SYMBOLP (definition)) |
| 2969 | { | 2969 | { |
| 2970 | XSETSTRING (tem1, XSYMBOL (definition)->name); | 2970 | tem1 = SYMBOL_NAME (definition); |
| 2971 | insert1 (tem1); | 2971 | insert1 (tem1); |
| 2972 | insert_string ("\n"); | 2972 | insert_string ("\n"); |
| 2973 | } | 2973 | } |