]> git.eshelyaron.com Git - emacs.git/commitdiff
* isearch.el (isearch-other-meta-char): Avoid error if lookup in
authorKarl Heuer <kwzh@gnu.org>
Wed, 24 Jan 1996 23:26:25 +0000 (23:26 +0000)
committerKarl Heuer <kwzh@gnu.org>
Wed, 24 Jan 1996 23:26:25 +0000 (23:26 +0000)
function-key-map gives another keymap.

lisp/isearch.el

index 6fb53604b42aba3b30bb6529d6256e1d954a6ab5..2b0783805feea3de67299ef424165d1e75153f8a 100644 (file)
@@ -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.