mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
(mode-line-mule-info): Use :propertize, not :eval.
This commit is contained in:
parent
f95807815b
commit
27451bb4df
1 changed files with 6 additions and 8 deletions
|
|
@ -138,14 +138,12 @@ corresponding to the mode line clicked."
|
|||
(defvar mode-line-mule-info
|
||||
`(""
|
||||
(current-input-method
|
||||
(:eval
|
||||
,(purecopy
|
||||
'(propertize current-input-method-title
|
||||
'help-echo (concat
|
||||
"Input method: "
|
||||
current-input-method
|
||||
". mouse-2: disable, mouse-3: describe")
|
||||
'local-map mode-line-input-method-map))))
|
||||
(:propertize ("" current-input-method-title)
|
||||
help-echo (concat
|
||||
"Input method: "
|
||||
current-input-method
|
||||
". mouse-2: disable, mouse-3: describe")
|
||||
local-map ,mode-line-input-method-map))
|
||||
,(propertize
|
||||
"%Z"
|
||||
'help-echo
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue