jt/emacs-prelude
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Move Prelude's menu item under Tools.

Browse source
This commit is contained in:
Bozhidar Batsov 2013-01-13 15:07:26 +02:00
parent 104c84e905
commit 97bab294cc
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
core/prelude-mode.el
View file

@ -54,8 +54,7 @@
map) map)
"Keymap for Prelude mode.") "Keymap for Prelude mode.")
(easy-menu-define prelude-mode-menu prelude-mode-map (easy-menu-add-item nil '("Tools")
"Menu for Prelude mode"
'("Prelude" '("Prelude"
("Files" ("Files"
["Open with..." prelude-open-with] ["Open with..." prelude-open-with]
@ -88,7 +87,10 @@
("General" ("General"
["Visit term buffer" prelude-visit-term-buffer] ["Visit term buffer" prelude-visit-term-buffer]
["Search in Google" prelude-google] ["Search in Google" prelude-google]
["View URL" prelude-view-url]))) ["View URL" prelude-view-url]))
"Search Files (Grep)...")
(easy-menu-add-item nil '("Tools") '("----") "Search Files (Grep)...")
;; define minor mode ;; define minor mode
(define-globalized-minor-mode prelude-global-mode prelude-mode prelude-on) (define-globalized-minor-mode prelude-global-mode prelude-mode prelude-on)
@ -107,7 +109,6 @@
:keymap prelude-mode-map :keymap prelude-mode-map
(if prelude-mode (if prelude-mode
;; on start ;; on start
(easy-menu-add prelude-mode-menu prelude-mode-map)
;; on stop ;; on stop
(prelude-off))) (prelude-off)))