1
Fork 0
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:
Richard M. Stallman 2002-03-28 18:23:08 +00:00
parent f95807815b
commit 27451bb4df

View file

@ -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