diff options
author | Karl Heuer <kwzh@gnu.org> | 1995-04-25 22:32:18 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1995-04-25 22:32:18 +0000 |
commit | 048ea441e2e43d9bad6fce4c890e93310ca3c998 (patch) | |
tree | ae2388467eee25298eed479efe57fe0f2e063293 /lisp/dired-x.el | |
parent | 45d8d39ff8704fc50b8331bbaa2b4bf84b95c2c5 (diff) | |
download | emacs-048ea441e2e43d9bad6fce4c890e93310ca3c998.tar.gz |
(dired-omit-expunge): Use force-mode-line-update.
Diffstat (limited to 'lisp/dired-x.el')
-rw-r--r-- | lisp/dired-x.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/dired-x.el b/lisp/dired-x.el index c8aaf780fef..bf066123bf7 100644 --- a/lisp/dired-x.el +++ b/lisp/dired-x.el @@ -588,8 +588,7 @@ This functions works by temporarily binding `dired-marker-char' to (if (dired-mark-unmarked-files omit-re nil nil dired-omit-localp) (progn (setq count (dired-do-kill-lines nil "Omitted %d line%s.")) - ;; Force an update of modeline. - (set-buffer-modified-p (buffer-modified-p))) + (force-mode-line-update)) (message "(Nothing to omit)")))) ;; Try to preserve modified state of buffer. So `%*' doesn't appear ;; in mode-line of omitted buffers. |