Function: mode-line-window-control

mode-line-window-control is a byte-compiled function defined in bindings.el.gz.

Signature

(mode-line-window-control)

Documentation

Compute mode line construct for window dedicated state.

Value is used for mode-line-window-dedicated, which see.

Source Code

;; Defined in /usr/src/emacs/lisp/bindings.el.gz
(defun mode-line-window-control ()
  "Compute mode line construct for window dedicated state.
Value is used for `mode-line-window-dedicated', which see."
  (cond
   ((eq (window-dedicated-p) t)
    (propertize
     "D"
     'help-echo "Window strongly dedicated to its buffer\nmouse-1: Toggle"
     'local-map mode-line-window-dedicated-keymap
     'mouse-face 'mode-line-highlight))
   ((window-dedicated-p)
    (propertize
     "d"
     'help-echo "Window dedicated to its buffer\nmouse-1: Toggle"
     'local-map mode-line-window-dedicated-keymap
     'mouse-face 'mode-line-highlight))
   (t "")))