Commit a69c6141 authored by Nick Roberts's avatar Nick Roberts
Browse files

(mode-line-mode-menu): Add tooltip-mode to mode-line.

parent 8bc973e9
......@@ -392,6 +392,9 @@ Menu of mode operations in the mode line.")
"Return the value of symbol VAR if it is bound, else nil."
`(and (boundp (quote ,var)) ,var))
(define-key mode-line-mode-menu [tooltip-mode]
`(menu-item ,(purecopy "Tooltip") tooltip-mode
:button (:toggle . tooltip-mode)))
(define-key mode-line-mode-menu [overwrite-mode]
`(menu-item ,(purecopy "Overwrite (Ovwrt)") overwrite-mode
:button (:toggle . overwrite-mode)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment