1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 02:31:03 -08:00

(byte-recompile-directory): Use force-mode-line-update.

This commit is contained in:
Karl Heuer 1995-04-25 22:32:49 +00:00
parent 2fc86734b7
commit ba90138812

View file

@ -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)