Commit aeaef62c authored by Alan Mackenzie's avatar Alan Mackenzie
Browse files

Fix the mouse help/key map on the "%p" part of the mode line.

* lisp/bindings.el (mode-line-percent-position): give it a
`risky-local-variable' property.
(mode-line-position): correct the quoting on the mode-line-percent-position
part of the variable, allowing the properties to be properly recognized.
parent 412c38aa
......@@ -382,14 +382,15 @@ displayed in `mode-line-position', a component of the default
(6 "%q")))
:version "26.1"
:group 'mode-line)
(put 'mode-line-percent-position 'risky-local-variable t)
(defvar mode-line-position
`((:propertize
mode-line-percent-position
'local-map mode-line-column-line-number-mode-map
'mouse-face 'mode-line-highlight
local-map ,mode-line-column-line-number-mode-map
mouse-face mode-line-highlight
;; XXX needs better description
'help-echo "Size indication mode\n\
help-echo "Size indication mode\n\
mouse-1: Display Line and Column Mode Menu")
(size-indication-mode
(8 ,(propertize
......
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