summaryrefslogtreecommitdiff
path: root/lisp/isearch.el
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1996-01-24 23:26:25 +0000
committerKarl Heuer <kwzh@gnu.org>1996-01-24 23:26:25 +0000
commitd8f6e9321ac60a4b367b77ed84e73424fe5027a4 (patch)
tree6e3a39ca72c0f8a1c4a3748cb9e4417f1e9bd8cb /lisp/isearch.el
parent58fdcb90e378fbccd8b3ac5433007a512e68685b (diff)
downloademacs-d8f6e9321ac60a4b367b77ed84e73424fe5027a4.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.el3
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.