[Emacs-diffs] Changes to emacs/lisp/isearch.el

[Eli Zaretskii]

Index: emacs/lisp/isearch.el
diff -u emacs/lisp/isearch.el:1.284 emacs/lisp/isearch.el:1.285
--- emacs/lisp/isearch.el:1.284 Tue Feb 21 19:52:07 2006
+++ emacs/lisp/isearch.el       Sat Mar 18 15:11:48 2006
@@ -1696,12 +1696,15 @@
             (and (integerp main-event)
                  (memq 'shift mods)
                  (memq 'control mods)
-                 (lookup-key isearch-mode-map
-                             (let ((copy (copy-sequence key)))
-                               (aset copy 0
-                                     (- main-event (- ?\C-\S-a ?\C-a)))
-                               copy)
-                             nil)))
+                 (not (memq (lookup-key isearch-mode-map
+                                        (let ((copy (copy-sequence key)))
+                                          (aset copy 0
+                                                (- main-event
+                                                   (- ?\C-\S-a ?\C-a)))
+                                          copy)
+                                        nil)
+                            '(nil
+                              isearch-other-control-char)))))
           (setcar keylist (- main-event (- ?\C-\S-a ?\C-a)))
           (cancel-kbd-macro-events)
           (apply 'isearch-unread keylist))