diff options
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/keymap.c b/src/keymap.c index 00eefb375ef..c43d528b25b 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -611,7 +611,8 @@ map_keymap_internal (Lisp_Object map, | |||
| 611 | } | 611 | } |
| 612 | else if (CHAR_TABLE_P (binding)) | 612 | else if (CHAR_TABLE_P (binding)) |
| 613 | map_char_table (map_keymap_char_table_item, Qnil, binding, | 613 | map_char_table (map_keymap_char_table_item, Qnil, binding, |
| 614 | make_save_value ("ppo", fun, data, args)); | 614 | make_save_value (SAVE_TYPE_PTR_PTR_OBJ, |
| 615 | fun, data, args)); | ||
| 615 | } | 616 | } |
| 616 | UNGCPRO; | 617 | UNGCPRO; |
| 617 | return tail; | 618 | return tail; |
| @@ -1555,8 +1556,8 @@ like in the respective argument of `key-binding'. */) | |||
| 1555 | window = POSN_WINDOW (position); | 1556 | window = POSN_WINDOW (position); |
| 1556 | 1557 | ||
| 1557 | if (WINDOWP (window) | 1558 | if (WINDOWP (window) |
| 1558 | && BUFFERP (XWINDOW (window)->buffer) | 1559 | && BUFFERP (XWINDOW (window)->contents) |
| 1559 | && XBUFFER (XWINDOW (window)->buffer) != current_buffer) | 1560 | && XBUFFER (XWINDOW (window)->contents) != current_buffer) |
| 1560 | { | 1561 | { |
| 1561 | /* Arrange to go back to the original buffer once we're done | 1562 | /* Arrange to go back to the original buffer once we're done |
| 1562 | processing the key sequence. We don't use | 1563 | processing the key sequence. We don't use |
| @@ -1566,7 +1567,7 @@ like in the respective argument of `key-binding'. */) | |||
| 1566 | things the same. | 1567 | things the same. |
| 1567 | */ | 1568 | */ |
| 1568 | record_unwind_current_buffer (); | 1569 | record_unwind_current_buffer (); |
| 1569 | set_buffer_internal (XBUFFER (XWINDOW (window)->buffer)); | 1570 | set_buffer_internal (XBUFFER (XWINDOW (window)->contents)); |
| 1570 | } | 1571 | } |
| 1571 | } | 1572 | } |
| 1572 | 1573 | ||