summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2000-12-07 13:27:08 +0000
committerGerd Moellmann <gerd@gnu.org>2000-12-07 13:27:08 +0000
commit7f8661a0ab7e34184c708d2ec58143e85fbf14cf (patch)
treefeda0b69ee7a21e3ddb6a1435ba86b5e5a9f508e /lisp
parent97f1dbede6bcde329be1965f6ba871d9e5f95c25 (diff)
downloademacs-7f8661a0ab7e34184c708d2ec58143e85fbf14cf.tar.gz
(mode-line-mode-menu): Add glasses-mode.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/bindings.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el
index d156360c772..899afbb8c5a 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -322,6 +322,9 @@ Return a string to display in the mode line for the current mode name."
(define-key mode-line-mode-menu [highlight-changes-mode]
`(menu-item ,(purecopy "Highlight changes") highlight-changes-mode
:button (:toggle . highlight-changes-mode)))
+(define-key mode-line-mode-menu [glasses-mode]
+ `(menu-item ,(purecopy "Glasses") glasses-mode
+ :button (:toggle . glasses-mode)))
(define-key mode-line-mode-menu [hide-ifdef-mode]
`(menu-item ,(purecopy "Hide ifdef") hide-ifdef-mode
:button (:toggle . (bound-and-true-p hide-ifdef-mode))))