master 9bf8bb0: Fix space at the start of appt mode line element

[Lars Ingebrigtsen]

branch: master
commit 9bf8bb0e3e2dc7b62626d877d64adcbd12238be1
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix space at the start of appt mode line element
    
    * lisp/calendar/appt.el (appt-check): Add space at the end
    (bug#18164) -- all `global-mode-string' elements should have it
    there to get an even space distribution.
---
 lisp/calendar/appt.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el
index 29bcd6d..f523863 100644
--- a/lisp/calendar/appt.el
+++ b/lisp/calendar/appt.el
@@ -402,11 +402,12 @@ displayed in a window:
              (appt-display-message string-list min-list))
         (when appt-display-mode-line
           (setq appt-mode-string
-                (concat " " (propertize
-                             (appt-mode-line (mapcar #'number-to-string
-                                                     min-list)
-                                             t)
-                             'face 'mode-line-emphasis))))
+                (concat (propertize
+                         (appt-mode-line (mapcar #'number-to-string
+                                                 min-list)
+                                         t)
+                         'face 'mode-line-emphasis)
+                        " ")))
         ;; Reset count to 0 in case we display another appt on the next cycle.
         (setq appt-display-count (if (eq '(0) min-list) 0
                                    (1+ prev-appt-display-count))))