From: Francois Fleuret <francois@fleuret.org>
Date: Mon, 30 Nov 2015 17:53:25 +0000 (+0100)
Subject: Update.
X-Git-Url: https://www.fleuret.org/cgi-bin/gitweb/gitweb.cgi?p=elisp.git;a=commitdiff_plain;h=55327bbf092e7ea9cd719ac6e7cdaa116b749cde

Update.
---

diff --git a/emacs.el b/emacs.el
index fa38ffd..38d2575 100644
--- a/emacs.el
+++ b/emacs.el
@@ -974,28 +974,31 @@ printer."
 
  display-time-string-forms `(
 
-                             load " "
+                             load
 
-                                  (ff/temp-info-string)
+                             " "
 
-                                  ,@(when (ff/battery-info-string)
-                                      '((propertize
-                                        (ff/battery-info-string)
-                                        'face 'ff/battery-info-face)))
+                             ,@(when (ff/battery-info-string)
+                                 '((ff/temp-info-string)))
 
-                                  " "
+                             ,@(when (ff/battery-info-string)
+                                 '((propertize
+                                    (ff/battery-info-string)
+                                    'face 'ff/battery-info-face)))
 
-                                  (propertize
-                                   (concat ;;" ˌ"
-                                    24-hours ":" minutes
-                                    " "
-                                    ;; dayname " "
-                                    monthname " " day
-                                    ;;"ˌ"
-                                    )
-                                   'face 'ff/date-info-face)
+                             " "
 
-                                  )
+                             (propertize
+                              (concat ;;" ˌ"
+                               24-hours ":" minutes
+                               " "
+                               ;; dayname " "
+                               monthname " " day
+                               ;;"ˌ"
+                               )
+                              'face 'ff/date-info-face)
+
+                             )
 
  ;; display-time-format "%b %a %e %H:%M"
  ;; display-time-mail-face nil