(isearch-other-meta-char): Correct the test for a split-up

mode line or scroll bar mouse event.

1 files changed, 4 insertions, 2 deletions

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 4330848b6bd..c7e84b7f9b0 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -4,7 +4,7 @@
 
 ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu>
 
-;; |$Date: 1993/10/09 20:03:33 $|$Revision: 1.51 $
+;; |$Date: 1993/10/24 04:05:22 $|$Revision: 1.52 $
 
 ;; This file is part of GNU Emacs.
 
@@ -1001,7 +1001,9 @@ and the meta character is unread so that it applies to editing the string."
            (and (> (length key) 1)
                 (symbolp (aref key 0))
                 (listp (aref key 1))
-                (consp (posn-point (event-start (aref key 1))))
+                ;; These events now have a symbol; they used to have a list.
+                ;; Accept either one.  Other events have a number here.
+                (not (numberp (posn-point (event-start (aref key 1)))))
                 (setq index 1))
            ;; If we got a mouse click, maybe it was read with the buffer
            ;; it was clicked on.  If so, that buffer, not the current one,