[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 91a52e3: Fix the mouse help/key map on the "%p" par
From: |
Alan Mackenzie |
Subject: |
[Emacs-diffs] master 91a52e3: Fix the mouse help/key map on the "%p" part of the mode line. |
Date: |
Tue, 30 May 2017 12:25:56 -0400 (EDT) |
branch: master
commit 91a52e38e5194f19f0d44ae4c2ad88565b28a196
Author: Alan Mackenzie <address@hidden>
Commit: Alan Mackenzie <address@hidden>
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.
---
lisp/bindings.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/lisp/bindings.el b/lisp/bindings.el
index 0e6ffc2..0994b71 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 91a52e3: Fix the mouse help/key map on the "%p" part of the mode line.,
Alan Mackenzie <=