summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/bytecomp.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/bytecomp.el')
-rw-r--r--lisp/emacs-lisp/bytecomp.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index e383dc13d37..333fde26491 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -1123,7 +1123,7 @@ A nonzero prefix argument also means ask about each subdirectory."
(if noninteractive
nil
(save-some-buffers)
- (set-buffer-modified-p (buffer-modified-p))) ;Update the mode line.
+ (force-mode-line-update))
(let ((directories (list (expand-file-name directory)))
(file-count 0)
(dir-count 0)