* lisp/time.el (display-time-update): Update all mode lines.

Fixes: debbugs:15999

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8e4bd8f37e0324fcaea8f583c7f1c80bb956cf6c..0a8043feeba0b7edaa232b08d5ebde6bab3488d9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2013-11-29  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * time.el (display-time-update): Update all mode lines (bug#15999).
+
        * electric.el (electric-indent-mode): Enable by default.
        * loadup.el: Preload "electric".
 

diff --git a/lisp/time.el b/lisp/time.el
index 7e558746c6ad49a5a939f1be1d8a35424b8c4763..51365b2b8c6fd256b7419ff5956888d74356f283 100644 (file)
--- a/lisp/time.el
+++ b/lisp/time.el
@@ -471,7 +471,7 @@ update which can wait for the next redisplay."
     ;; This is inside the let binding, but we are not going to document
     ;; what variables are available.
     (run-hooks 'display-time-hook))
-  (force-mode-line-update))
+  (force-mode-line-update 'all))
 
 (defun display-time-file-nonempty-p (file)
   (let ((remote-file-name-inhibit-cache (- display-time-interval 5)))