]> git.eshelyaron.com Git - emacs.git/commitdiff
Add more isearch-related bindings to ns-win.el
authorKeith David Bershatsky <esq@lawlist.com>
Fri, 22 Jan 2021 18:18:41 +0000 (19:18 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Fri, 22 Jan 2021 18:18:41 +0000 (19:18 +0100)
* lisp/term/ns-win.el (minibuffer-local-isearch-map): Add more
bindings to mirror bindings in isearch.el (bug#15667).

lisp/term/ns-win.el

index 5f4dd9ef587760781fd3e240bc7416511025507b..94e9d5c582846671af84f98d10f1ff6de41a5bb0 100644 (file)
@@ -120,6 +120,15 @@ The properties returned may include `top', `left', `height', and `width'."
 (define-key global-map [?\s-d] 'isearch-repeat-backward)
 (define-key global-map [?\s-e] 'isearch-yank-kill)
 (define-key global-map [?\s-f] 'isearch-forward)
+(define-key esc-map [?\s-f] 'isearch-forward-regexp)
+(define-key minibuffer-local-isearch-map [?\s-f]
+  'isearch-forward-exit-minibuffer)
+(define-key isearch-mode-map [?\s-f] 'isearch-repeat-forward)
+(define-key global-map [?\s-F] 'isearch-backward)
+(define-key esc-map [?\s-F] 'isearch-backward-regexp)
+(define-key minibuffer-local-isearch-map [?\s-F]
+  'isearch-reverse-exit-minibuffer)
+(define-key isearch-mode-map [?\s-F] 'isearch-repeat-backward)
 (define-key global-map [?\s-g] 'isearch-repeat-forward)
 (define-key global-map [?\s-h] 'ns-do-hide-emacs)
 (define-key global-map [?\s-H] 'ns-do-hide-others)