X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/adf2fc4a01efe77d73cd52bc9173914ed56ff531..ba874b6430893be55d48840a901aac4e64a4befc:/lisp/time.el

diff --git a/lisp/time.el b/lisp/time.el
index 7e558746c6..51365b2b8c 100644
--- 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)))