comparison src/keyboard.c @ 20493:698bee206f03

(Fexecute_extended_command): Save and restore message_enable_multibyte.
author Richard M. Stallman <rms@gnu.org>
date Sun, 21 Dec 1997 02:12:03 +0000
parents 01f1baff05d3
children b2536e1685e9
comparison
equal deleted inserted replaced
20492:8f8db0e25b29 20493:698bee206f03
7272 { 7272 {
7273 Lisp_Object binding; 7273 Lisp_Object binding;
7274 char *newmessage; 7274 char *newmessage;
7275 char *oldmessage = echo_area_glyphs; 7275 char *oldmessage = echo_area_glyphs;
7276 int oldmessage_len = echo_area_glyphs_length; 7276 int oldmessage_len = echo_area_glyphs_length;
7277 int oldmultibyte = message_enable_multibyte;
7277 7278
7278 binding = Fkey_description (bindings); 7279 binding = Fkey_description (bindings);
7279 7280
7280 newmessage 7281 newmessage
7281 = (char *) alloca (XSYMBOL (function)->name->size 7282 = (char *) alloca (XSYMBOL (function)->name->size
7286 XSTRING (binding)->data); 7287 XSTRING (binding)->data);
7287 message1_nolog (newmessage); 7288 message1_nolog (newmessage);
7288 if (!NILP (Fsit_for ((NUMBERP (Vsuggest_key_bindings) 7289 if (!NILP (Fsit_for ((NUMBERP (Vsuggest_key_bindings)
7289 ? Vsuggest_key_bindings : make_number (2)), 7290 ? Vsuggest_key_bindings : make_number (2)),
7290 Qnil, Qnil))) 7291 Qnil, Qnil)))
7291 message2_nolog (oldmessage, oldmessage_len); 7292 {
7293 message_enable_multibyte = oldmultibyte;
7294 message2_nolog (oldmessage, oldmessage_len);
7295 }
7292 } 7296 }
7293 } 7297 }
7294 7298
7295 RETURN_UNGCPRO (value); 7299 RETURN_UNGCPRO (value);
7296 } 7300 }