diff options
| -rw-r--r-- | lisp/isearch.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index 6fb53604b42..2b0783805fe 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -1004,7 +1004,8 @@ and the meta character is unread so that it applies to editing the string." | |||
| 1004 | (keylist (listify-key-sequence key))) | 1004 | (keylist (listify-key-sequence key))) |
| 1005 | (cond ((and (= (length key) 1) | 1005 | (cond ((and (= (length key) 1) |
| 1006 | (let ((lookup (lookup-key function-key-map key))) | 1006 | (let ((lookup (lookup-key function-key-map key))) |
| 1007 | (not (or (null lookup) (integerp lookup))))) | 1007 | (not (or (null lookup) (integerp lookup) |
| 1008 | (keymapp lookup))))) | ||
| 1008 | ;; Handle a function key that translates into something else. | 1009 | ;; Handle a function key that translates into something else. |
| 1009 | ;; If the key has a global definition too, | 1010 | ;; If the key has a global definition too, |
| 1010 | ;; exit and unread the key itself, so its global definition runs. | 1011 | ;; exit and unread the key itself, so its global definition runs. |