diff options
author | Karl Heuer <kwzh@gnu.org> | 1996-01-24 23:26:25 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1996-01-24 23:26:25 +0000 |
commit | 3f866b532489c24e9de7a7477a35fa8b2332a59a (patch) | |
tree | a7bc3154c50b5053907899284be51f48a5ba2134 /lisp/isearch.el | |
parent | ba369f54e016e2475d73abeae2ff355485f42325 (diff) | |
download | emacs-3f866b532489c24e9de7a7477a35fa8b2332a59a.tar.gz |
* isearch.el (isearch-other-meta-char): Avoid error if lookup in
function-key-map gives another keymap.
Diffstat (limited to 'lisp/isearch.el')
-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." (keylist (listify-key-sequence key))) (cond ((and (= (length key) 1) (let ((lookup (lookup-key function-key-map key))) - (not (or (null lookup) (integerp lookup))))) + (not (or (null lookup) (integerp lookup) + (keymapp lookup))))) ;; Handle a function key that translates into something else. ;; If the key has a global definition too, ;; exit and unread the key itself, so its global definition runs. |