emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master a956305f99 2/2: Move the Incremental Search menu one menu up


From: Lars Ingebrigtsen
Subject: master a956305f99 2/2: Move the Incremental Search menu one menu up
Date: Mon, 25 Apr 2022 08:09:59 -0400 (EDT)

branch: master
commit a956305f99c77d2b0f4cdffcfac91dbedf9f4038
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Move the Incremental Search menu one menu up
    
    * lisp/menu-bar.el (menu-bar-search-menu): Move the Incremental
    Search from the Search menu...
    (menu-bar-edit-menu): ... one step up (bug#43308).
---
 lisp/menu-bar.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index d8c8c760f7..44922a016a 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -311,7 +311,7 @@
     (isearch-update-ring string t)
     (re-search-backward string)))
 
-;; The Edit->Search->Incremental Search menu
+;; The Edit->Incremental Search menu
 (defvar menu-bar-i-search-menu
   (let ((menu (make-sparse-keymap "Incremental Search")))
     (bindings--define-key menu [isearch-forward-symbol-at-point]
@@ -340,8 +340,6 @@
 (defvar menu-bar-search-menu
   (let ((menu (make-sparse-keymap "Search")))
 
-    (bindings--define-key menu [i-search]
-      `(menu-item "Incremental Search" ,menu-bar-i-search-menu))
     (bindings--define-key menu [separator-tag-isearch]
       menu-bar-separator)
 
@@ -501,6 +499,9 @@
     (bindings--define-key menu [replace]
       `(menu-item "Replace" ,menu-bar-replace-menu))
 
+    (bindings--define-key menu [i-search]
+      `(menu-item "Incremental Search" ,menu-bar-i-search-menu))
+
     (bindings--define-key menu [search]
       `(menu-item "Search" ,menu-bar-search-menu))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]