From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 24 Jan 1996 23:26:25 +0000 (+0000)
Subject: * isearch.el (isearch-other-meta-char): Avoid error if lookup in
X-Git-Tag: emacs-19.34~1572
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3f866b532489c24e9de7a7477a35fa8b2332a59a;p=emacs.git

* isearch.el (isearch-other-meta-char): Avoid error if lookup in
function-key-map gives another keymap.
---

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.