add my-help button and change scratch buffer to fundamental-mode
This commit is contained in:
@@ -238,6 +238,14 @@ with a drive letter and a colon."))
|
|||||||
|
|
||||||
;; don't show the startup screen
|
;; don't show the startup screen
|
||||||
(setq inhibit-startup-screen t)
|
(setq inhibit-startup-screen t)
|
||||||
|
(use-package startup
|
||||||
|
:defer t
|
||||||
|
:init
|
||||||
|
(setq initial-major-mode 'fundamental-mode)
|
||||||
|
(setq initial-scratch-message "# This buffer is for text that is not saved.
|
||||||
|
|
||||||
|
"))
|
||||||
|
|
||||||
|
|
||||||
;; each line of text gets one line on the screen (i.e., text will run
|
;; each line of text gets one line on the screen (i.e., text will run
|
||||||
;; off the right instead of wrapping around onto a new line)
|
;; off the right instead of wrapping around onto a new line)
|
||||||
@@ -761,7 +769,8 @@ Version 2016-07-13"
|
|||||||
|
|
||||||
(easy-menu-add-item nil () my-menu ;; add empty my menu to menu-bar
|
(easy-menu-add-item nil () my-menu ;; add empty my menu to menu-bar
|
||||||
;; "Edit" ;; before Edit
|
;; "Edit" ;; before Edit
|
||||||
)
|
)
|
||||||
|
(easy-menu-add-item nil '("My") '["Help" my-help :help "my-help"])
|
||||||
(easy-menu-add-item nil '("My") my-major-menu) ;; add submenu to my menu
|
(easy-menu-add-item nil '("My") my-major-menu) ;; add submenu to my menu
|
||||||
(easy-menu-add-item nil '("My") my-lang-menu)
|
(easy-menu-add-item nil '("My") my-lang-menu)
|
||||||
(easy-menu-add-item nil '("My") my-minor-menu)
|
(easy-menu-add-item nil '("My") my-minor-menu)
|
||||||
|
|||||||
Reference in New Issue
Block a user