aboutsummaryrefslogtreecommitdiffstats
path: root/src/keymap.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/keymap.c')
-rw-r--r--src/keymap.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/keymap.c b/src/keymap.c
index ed572a5a8c1..368903db5e6 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -1338,7 +1338,7 @@ silly_event_symbol_error (Lisp_Object c)
1338 *p = 0; 1338 *p = 0;
1339 1339
1340 c = reorder_modifiers (c); 1340 c = reorder_modifiers (c);
1341 keystring = concat2 (build_local_string (new_mods), XCDR (assoc)); 1341 keystring = concat2 (SCOPED_STRING (new_mods), XCDR (assoc));
1342 1342
1343 error ("To bind the key %s, use [?%s], not [%s]", 1343 error ("To bind the key %s, use [?%s], not [%s]",
1344 SDATA (SYMBOL_NAME (c)), SDATA (keystring), 1344 SDATA (SYMBOL_NAME (c)), SDATA (keystring),
@@ -2243,7 +2243,7 @@ around function keys and event symbols. */)
2243 if (CONSP (key) && INTEGERP (XCAR (key)) && INTEGERP (XCDR (key))) 2243 if (CONSP (key) && INTEGERP (XCAR (key)) && INTEGERP (XCDR (key)))
2244 /* An interval from a map-char-table. */ 2244 /* An interval from a map-char-table. */
2245 return concat3 (Fsingle_key_description (XCAR (key), no_angles), 2245 return concat3 (Fsingle_key_description (XCAR (key), no_angles),
2246 build_local_string (".."), 2246 SCOPED_STRING (".."),
2247 Fsingle_key_description (XCDR (key), no_angles)); 2247 Fsingle_key_description (XCDR (key), no_angles));
2248 2248
2249 key = EVENT_HEAD (key); 2249 key = EVENT_HEAD (key);
@@ -3441,7 +3441,7 @@ describe_vector (Lisp_Object vector, Lisp_Object prefix, Lisp_Object args,
3441 { 3441 {
3442 Lisp_Object tem; 3442 Lisp_Object tem;
3443 tem = Fkey_description (prefix, Qnil); 3443 tem = Fkey_description (prefix, Qnil);
3444 elt_prefix = concat2 (tem, build_local_string (" ")); 3444 elt_prefix = concat2 (tem, SCOPED_STRING (" "));
3445 } 3445 }
3446 prefix = Qnil; 3446 prefix = Qnil;
3447 } 3447 }