aboutsummaryrefslogtreecommitdiffstats
path: root/src/keymap.c
diff options
context:
space:
mode:
authorKen Raeburn2002-05-20 08:06:00 +0000
committerKen Raeburn2002-05-20 08:06:00 +0000
commitc85d524cf71baa606ac7f08cda970c8a2132708b (patch)
tree32b55672e468890f8688e9ea8bd3f86acff1dc40 /src/keymap.c
parentc60a57d71ca1e32c2fa6d7561bf129e9d4723d7f (diff)
downloademacs-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.c20
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 }