diff options
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/keymap.c b/src/keymap.c index 922c1703edf..00eefb375ef 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -565,7 +565,8 @@ map_keymap_char_table_item (Lisp_Object args, Lisp_Object key, Lisp_Object val) | |||
| 565 | { | 565 | { |
| 566 | if (!NILP (val)) | 566 | if (!NILP (val)) |
| 567 | { | 567 | { |
| 568 | map_keymap_function_t fun = XSAVE_POINTER (args, 0); | 568 | map_keymap_function_t fun |
| 569 | = (map_keymap_function_t) XSAVE_POINTER (args, 0); | ||
| 569 | /* If the key is a range, make a copy since map_char_table modifies | 570 | /* If the key is a range, make a copy since map_char_table modifies |
| 570 | it in place. */ | 571 | it in place. */ |
| 571 | if (CONSP (key)) | 572 | if (CONSP (key)) |
| @@ -2310,7 +2311,6 @@ around function keys and event symbols. */) | |||
| 2310 | return Fcopy_sequence (key); | 2311 | return Fcopy_sequence (key); |
| 2311 | else | 2312 | else |
| 2312 | error ("KEY must be an integer, cons, symbol, or string"); | 2313 | error ("KEY must be an integer, cons, symbol, or string"); |
| 2313 | return Qnil; | ||
| 2314 | } | 2314 | } |
| 2315 | 2315 | ||
| 2316 | static char * | 2316 | static char * |