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

Fixes: debbugs:15999

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8e4bd8f..0a8043f 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 7e55874..51365b2 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)))