summaryrefslogtreecommitdiff
path: root/lisp/dired-x.el
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1995-04-25 22:32:18 +0000
committerKarl Heuer <kwzh@gnu.org>1995-04-25 22:32:18 +0000
commit048ea441e2e43d9bad6fce4c890e93310ca3c998 (patch)
treeae2388467eee25298eed479efe57fe0f2e063293 /lisp/dired-x.el
parent45d8d39ff8704fc50b8331bbaa2b4bf84b95c2c5 (diff)
downloademacs-048ea441e2e43d9bad6fce4c890e93310ca3c998.tar.gz
(dired-omit-expunge): Use force-mode-line-update.
Diffstat (limited to 'lisp/dired-x.el')
-rw-r--r--lisp/dired-x.el3
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.