Avoid spurious whitespace in the modeline of emacsclient frames
* lisp/bindings.el (mode-line-client): Compute 'help-echotext
property in advance. (Bug#58183)
(cherry picked from commit 8c3338f6ba
)
This commit is contained in:
parent
96d52f8944
commit
0002d4f316
1 changed files with 3 additions and 3 deletions
|
@ -226,9 +226,9 @@ mnemonics of the following coding systems:
|
|||
(put 'mode-line-mule-info 'risky-local-variable t)
|
||||
|
||||
(defvar mode-line-client
|
||||
`(""
|
||||
(:propertize ("" (:eval (if (frame-parameter nil 'client) "@" "")))
|
||||
help-echo ,(purecopy "emacsclient frame")))
|
||||
`(:eval
|
||||
(if (frame-parameter nil 'client)
|
||||
,(propertize "@" 'help-echo (purecopy "emacsclient frame"))))
|
||||
"Mode line construct for identifying emacsclient frames.")
|
||||
;; Autoload if this file no longer dumped.
|
||||
;;;###autoload
|
||||
|
|
Loading…
Add table
Reference in a new issue