diff options
Diffstat (limited to 'src/keyboard.c')
| -rw-r--r-- | src/keyboard.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index 5a3031259d9..5df4f1b1ff4 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -3090,7 +3090,6 @@ read_char (int commandflag, int nmaps, Lisp_Object *maps, Lisp_Object prev_event | |||
| 3090 | /* Process the help character specially if enabled */ | 3090 | /* Process the help character specially if enabled */ |
| 3091 | if (!NILP (Vhelp_form) && help_char_p (c)) | 3091 | if (!NILP (Vhelp_form) && help_char_p (c)) |
| 3092 | { | 3092 | { |
| 3093 | Lisp_Object tem0; | ||
| 3094 | int count = SPECPDL_INDEX (); | 3093 | int count = SPECPDL_INDEX (); |
| 3095 | 3094 | ||
| 3096 | help_form_saved_window_configs | 3095 | help_form_saved_window_configs |
| @@ -8777,7 +8776,8 @@ access_keymap_keyremap (Lisp_Object map, Lisp_Object key, Lisp_Object prompt, | |||
| 8777 | (To ignore it safely, we would need to gcpro a bunch of | 8776 | (To ignore it safely, we would need to gcpro a bunch of |
| 8778 | other variables.) */ | 8777 | other variables.) */ |
| 8779 | if (! (VECTORP (next) || STRINGP (next))) | 8778 | if (! (VECTORP (next) || STRINGP (next))) |
| 8780 | error ("Function %s returns invalid key sequence", tem); | 8779 | error ("Function %s returns invalid key sequence", |
| 8780 | SSDATA (SYMBOL_NAME (tem))); | ||
| 8781 | } | 8781 | } |
| 8782 | return next; | 8782 | return next; |
| 8783 | } | 8783 | } |