Variable: mode-line-modes
mode-line-modes is a variable defined in bindings.el.gz.
Value
Large value
((compilation-in-progress
#("[Compiling] " 0 12
(help-echo "Compiling; mouse-2: Goto Buffer" mouse-face mode-line-highlight local-map
(keymap
(mode-line keymap
(mouse-2 . compilation-goto-in-progress-buffer))))))
#("%[" 0 2
(help-echo "Recursive edit, type C-M-c to get out"))
"("
(:propertize
("" mode-name)
help-echo "Major mode\nmouse-1: Display major mode menu\nmouse-2: Show help for major mode\nmouse-3: Toggle minor modes" mouse-face mode-line-highlight local-map
(keymap
(mode-line keymap
(down-mouse-3 menu-item "Minor Modes"
(keymap
(orgtbl-mode menu-item "Org Table Mode" orgtbl-mode :button
(:toggle . orgtbl-mode))
(reftex-mode menu-item "RefTeX Mode" reftex-mode :button
(:toggle . reftex-mode))
(ruler-mode menu-item "Ruler" ruler-mode :button
(:toggle . ruler-mode))
(abbrev-mode menu-item "Abbrev (Abbrev)" abbrev-mode :help "Automatically expand abbreviations" :button
(:toggle . abbrev-mode))
(auto-fill-mode menu-item "Auto fill (Fill)" auto-fill-mode :help "Automatically insert new lines" :button
(:toggle . auto-fill-function))
(auto-revert-mode menu-item "Auto revert (ARev)" auto-revert-mode :help "Revert the buffer when the file on disk changes" :button
(:toggle bound-and-true-p auto-revert-mode))
(auto-revert-tail-mode menu-item "Auto revert tail (Tail)" auto-revert-tail-mode :help "Revert the tail of the buffer when the file on disk grows" :enable
(buffer-file-name)
:button
(:toggle bound-and-true-p auto-revert-tail-mode))
(flyspell-mode menu-item "Flyspell (Fly)" flyspell-mode :help "Spell checking on the fly" :button
(:toggle bound-and-true-p flyspell-mode))
(font-lock-mode menu-item "Font Lock" font-lock-mode :help "Syntax coloring" :button
(:toggle . font-lock-mode))
(glasses-mode menu-item "Glasses (o^o)" glasses-mode :help "Insert virtual separators to make long identifiers easy to read" :button
(:toggle bound-and-true-p glasses-mode))
(hide-ifdef-mode menu-item "Hide ifdef (Ifdef)" hide-ifdef-mode :help "Show/Hide code within #ifdef constructs" :button
(:toggle bound-and-true-p hide-ifdef-mode))
(highlight-changes-mode menu-item "Highlight changes (Chg)" highlight-changes-mode :help "Show changes in the buffer in a distinctive color" :button
(:toggle bound-and-true-p highlight-changes-mode))
(outline-minor-mode menu-item "Outline (Outl)" outline-minor-mode :help "" :button
(:toggle bound-and-true-p outline-minor-mode))
(overwrite-mode menu-item "Overwrite (Ovwrt)" overwrite-mode :help "Overwrite mode: typed characters replace existing text" :button
(:toggle . overwrite-mode))
"Minor Modes")
:filter bindings--sort-menu-keymap)
(mouse-2 . describe-mode)
(down-mouse-1 menu-item "Menu Bar" ignore :filter
#[257 "\300 \207"
[mouse-menu-major-mode-map]
2 "\n\n(fn _)"]))))
("" mode-line-process)
(:propertize
("" minor-mode-alist)
mouse-face mode-line-highlight help-echo "Minor mode\nmouse-1: Display minor mode menu\nmouse-2: Show help for minor mode\nmouse-3: Toggle minor modes" local-map
(keymap
(header-line keymap
(down-mouse-3 menu-item "Menu Bar"
(keymap
(orgtbl-mode menu-item "Org Table Mode" orgtbl-mode :button
(:toggle . orgtbl-mode))
(reftex-mode menu-item "RefTeX Mode" reftex-mode :button
(:toggle . reftex-mode))
(ruler-mode menu-item "Ruler" ruler-mode :button
(:toggle . ruler-mode))
(abbrev-mode menu-item "Abbrev (Abbrev)" abbrev-mode :help "Automatically expand abbreviations" :button
(:toggle . abbrev-mode))
(auto-fill-mode menu-item "Auto fill (Fill)" auto-fill-mode :help "Automatically insert new lines" :button
(:toggle . auto-fill-function))
(auto-revert-mode menu-item "Auto revert (ARev)" auto-revert-mode :help "Revert the buffer when the file on disk changes" :button
(:toggle bound-and-true-p auto-revert-mode))
(auto-revert-tail-mode menu-item "Auto revert tail (Tail)" auto-revert-tail-mode :help "Revert the tail of the buffer when the file on disk grows" :enable
(buffer-file-name)
:button
(:toggle bound-and-true-p auto-revert-tail-mode))
(flyspell-mode menu-item "Flyspell (Fly)" flyspell-mode :help "Spell checking on the fly" :button
(:toggle bound-and-true-p flyspell-mode))
(font-lock-mode menu-item "Font Lock" font-lock-mode :help "Syntax coloring" :button
(:toggle . font-lock-mode))
(glasses-mode menu-item "Glasses (o^o)" glasses-mode :help "Insert virtual separators to make long identifiers easy to read" :button
(:toggle bound-and-true-p glasses-mode))
(hide-ifdef-mode menu-item "Hide ifdef (Ifdef)" hide-ifdef-mode :help "Show/Hide code within #ifdef constructs" :button
(:toggle bound-and-true-p hide-ifdef-mode))
(highlight-changes-mode menu-item "Highlight changes (Chg)" highlight-changes-mode :help "Show changes in the buffer in a distinctive color" :button
(:toggle bound-and-true-p highlight-changes-mode))
(outline-minor-mode menu-item "Outline (Outl)" outline-minor-mode :help "" :button
(:toggle bound-and-true-p outline-minor-mode))
(overwrite-mode menu-item "Overwrite (Ovwrt)" overwrite-mode :help "Overwrite mode: typed characters replace existing text" :button
(:toggle . overwrite-mode))
"Minor Modes")
:filter bindings--sort-menu-keymap))
(mode-line keymap
(down-mouse-3 menu-item "Menu Bar"
(keymap
(orgtbl-mode menu-item "Org Table Mode" orgtbl-mode :button
(:toggle . orgtbl-mode))
(reftex-mode menu-item "RefTeX Mode" reftex-mode :button
(:toggle . reftex-mode))
(ruler-mode menu-item "Ruler" ruler-mode :button
(:toggle . ruler-mode))
(abbrev-mode menu-item "Abbrev (Abbrev)" abbrev-mode :help "Automatically expand abbreviations" :button
(:toggle . abbrev-mode))
(auto-fill-mode menu-item "Auto fill (Fill)" auto-fill-mode :help "Automatically insert new lines" :button
(:toggle . auto-fill-function))
(auto-revert-mode menu-item "Auto revert (ARev)" auto-revert-mode :help "Revert the buffer when the file on disk changes" :button
(:toggle bound-and-true-p auto-revert-mode))
(auto-revert-tail-mode menu-item "Auto revert tail (Tail)" auto-revert-tail-mode :help "Revert the tail of the buffer when the file on disk grows" :enable
(buffer-file-name)
:button
(:toggle bound-and-true-p auto-revert-tail-mode))
(flyspell-mode menu-item "Flyspell (Fly)" flyspell-mode :help "Spell checking on the fly" :button
(:toggle bound-and-true-p flyspell-mode))
(font-lock-mode menu-item "Font Lock" font-lock-mode :help "Syntax coloring" :button
(:toggle . font-lock-mode))
(glasses-mode menu-item "Glasses (o^o)" glasses-mode :help "Insert virtual separators to make long identifiers easy to read" :button
(:toggle bound-and-true-p glasses-mode))
(hide-ifdef-mode menu-item "Hide ifdef (Ifdef)" hide-ifdef-mode :help "Show/Hide code within #ifdef constructs" :button
(:toggle bound-and-true-p hide-ifdef-mode))
(highlight-changes-mode menu-item "Highlight changes (Chg)" highlight-changes-mode :help "Show changes in the buffer in a distinctive color" :button
(:toggle bound-and-true-p highlight-changes-mode))
(outline-minor-mode menu-item "Outline (Outl)" outline-minor-mode :help "" :button
(:toggle bound-and-true-p outline-minor-mode))
(overwrite-mode menu-item "Overwrite (Ovwrt)" overwrite-mode :help "Overwrite mode: typed characters replace existing text" :button
(:toggle . overwrite-mode))
"Minor Modes")
:filter bindings--sort-menu-keymap)
(mouse-2 . mode-line-minor-mode-help)
(down-mouse-1 . mouse-minor-mode-menu))))
#("%n" 0 2
(help-echo "mouse-2: Remove narrowing from buffer" mouse-face mode-line-highlight local-map
(keymap
(mode-line keymap
(mouse-2 . mode-line-widen)))))
")"
#("%]" 0 2
(help-echo "Recursive edit, type C-M-c to get out"))
" ")
Documentation
Mode line construct for displaying major and minor modes.
Source Code
;; Defined in /usr/src/emacs/lisp/bindings.el.gz
(defvar mode-line-modes
(let ((recursive-edit-help-echo
"Recursive edit, type C-M-c to get out"))
(list (propertize "%[" 'help-echo recursive-edit-help-echo)
"("
`(:propertize ("" mode-name)
help-echo "Major mode\n\
mouse-1: Display major mode menu\n\
mouse-2: Show help for major mode\n\
mouse-3: Toggle minor modes"
mouse-face mode-line-highlight
local-map ,mode-line-major-mode-keymap)
'("" mode-line-process)
`(:propertize ("" minor-mode-alist)
mouse-face mode-line-highlight
help-echo "Minor mode\n\
mouse-1: Display minor mode menu\n\
mouse-2: Show help for minor mode\n\
mouse-3: Toggle minor modes"
local-map ,mode-line-minor-mode-keymap)
(propertize "%n" 'help-echo "mouse-2: Remove narrowing from buffer"
'mouse-face 'mode-line-highlight
'local-map (make-mode-line-mouse-map
'mouse-2 #'mode-line-widen))
")"
(propertize "%]" 'help-echo recursive-edit-help-echo)
" "))
"Mode line construct for displaying major and minor modes.")