[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master fbfdd1e0e3e: * lisp/menu-bar.el (menu-bar-project-menu): Improve
From: |
Juri Linkov |
Subject: |
master fbfdd1e0e3e: * lisp/menu-bar.el (menu-bar-project-menu): Improve menu items. |
Date: |
Tue, 3 Oct 2023 13:14:54 -0400 (EDT) |
branch: master
commit fbfdd1e0e3e67f765c6dbf9f61b5f913e55e004e
Author: Juri Linkov <juri@linkov.net>
Commit: Juri Linkov <juri@linkov.net>
* lisp/menu-bar.el (menu-bar-project-menu): Improve menu items.
Remove ellipsis from menu items that don't read arguments from the
minibuffer.
---
lisp/menu-bar.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 3a348ebcdc6..2d6abf5d5e3 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -1804,7 +1804,7 @@ mail status in mode line"))
(bindings--define-key menu [project-find-regexp] '(menu-item "Find
Regexp..." project-find-regexp :help "Search for a regexp in files belonging to
current project"))
(bindings--define-key menu [separator-project-search] menu-bar-separator)
(bindings--define-key menu [project-kill-buffers] '(menu-item "Kill
Buffers..." project-kill-buffers :help "Kill the buffers belonging to the
current project"))
- (bindings--define-key menu [project-list-buffers] '(menu-item "List
Buffers..." project-list-buffers :help "Pop up a window listing all Emacs
buffers belonging to current project"))
+ (bindings--define-key menu [project-list-buffers] '(menu-item "List
Buffers" project-list-buffers :help "Pop up a window listing all Emacs buffers
belonging to current project"))
(bindings--define-key menu [project-switch-to-buffer] '(menu-item "Switch
To Buffer..." project-switch-to-buffer :help "Prompt for a buffer belonging to
current project, and switch to it"))
(bindings--define-key menu [separator-project-buffers] menu-bar-separator)
(bindings--define-key menu [project-async-shell-command] '(menu-item
"Async Shell Command..." project-async-shell-command :help "Invoke a shell
command in project root asynchronously in background"))
@@ -1814,7 +1814,7 @@ mail status in mode line"))
(bindings--define-key menu [project-compile] '(menu-item "Compile..."
project-compile :help "Invoke compiler or Make for current project, view
errors"))
(bindings--define-key menu [separator-project-programs] menu-bar-separator)
(bindings--define-key menu [project-switch-project] '(menu-item "Switch
Project..." project-switch-project :help "Switch to another project and then
run a command"))
- (bindings--define-key menu [project-vc-dir] '(menu-item "VC Dir..."
project-vc-dir :help "Show the VC status of the project repository"))
+ (bindings--define-key menu [project-vc-dir] '(menu-item "VC Dir"
project-vc-dir :help "Show the VC status of the project repository"))
(bindings--define-key menu [project-dired] '(menu-item "Open Project Root"
project-dired :help "Read the root directory of the current project, to operate
on its files"))
(bindings--define-key menu [project-find-dir] '(menu-item "Open
Directory..." project-find-dir :help "Open existing directory that belongs to
current project"))
(bindings--define-key menu [project-or-external-find-file] '(menu-item
"Open File Including External Roots..." project-or-external-find-file :help
"Open existing file that belongs to current project or its external roots"))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master fbfdd1e0e3e: * lisp/menu-bar.el (menu-bar-project-menu): Improve menu items.,
Juri Linkov <=