emacs/29.1/02_all_modeline.patch


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28

Avoid spurious whitespace in the modeline
Patch backported from master branch
https://debbugs.gnu.org/58183

commit 8c3338f6ba354218aee12c223d778be4180f892b
Author: Ulrich Müller <ulm@gentoo.org>
Date:   Fri Jul 28 12:21:42 2023 +0200

    Avoid spurious whitespace in the modeline of emacsclient frames

    * lisp/bindings.el (mode-line-client): Compute 'help-echo text
    property in advance.  (Bug#58183)

--- emacs-29/lisp/bindings.el
+++ emacs-29/lisp/bindings.el
@@ -226,9 +226,9 @@ mode-line-mule-info
 (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