mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(standard-mode-line-modes): Put special help-echo

Browse source 
tooltip on recursive edit %[ %] mode-line constructs.
This commit is contained in:
Juri Linkov 2008-03-21 23:59:04 +00:00
parent c59a65bdac
commit b7fd8c465f
1 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/bindings.el
View file

@ -345,7 +345,8 @@ mouse-3: Remove current window from display")
(propertize "-%-" 'help-echo help-echo)))
(standard-mode-line-modes
(list
(propertize "%[(" 'help-echo help-echo)
(propertize "%[" 'help-echo "Recursive edit, type C-M-c to get out")
(propertize "(" 'help-echo help-echo)
`(:propertize ("" mode-name)
help-echo "Major mode\n\
mouse-1: Display major mode menu\n\
@ -365,7 +366,9 @@ mouse-3: Toggle minor modes"
'mouse-face 'mode-line-highlight
'local-map (make-mode-line-mouse-map
'mouse-2 #'mode-line-widen))
(propertize ")%]--" 'help-echo help-echo)))
(propertize ")" 'help-echo help-echo)
(propertize "%]" 'help-echo "Recursive edit, type C-M-c to get out")
(propertize "--" 'help-echo help-echo)))
(standard-mode-line-position
`((-3 ,(propertize