mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-17 10:27:41 +00:00
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).
This commit is contained in:
parent
9fdaf9ac4d
commit
a956305f99
1 changed files with 4 additions and 3 deletions
|
|
@ -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))
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue