(dired-sort-set-modeline): Use force-mode-line-update.

diff --git a/lisp/dired.el b/lisp/dired.el
index c7ca5e8f7173acc207322c9ae7435d646935d56f..99c1b7961a2b9e9ab2e5520a527f5a4331850dde 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -2154,8 +2154,7 @@ Thus, use \\[backward-page] to find the beginning of a group of errors."
                 "Dired by date")
                (t
                 (concat "Dired " dired-actual-switches)))))
-  ;; update mode line:
-  (set-buffer-modified-p (buffer-modified-p)))
+  (force-mode-line-update))
 
 (defun dired-sort-toggle-or-edit (&optional arg)
   "Toggle between sort by date/name and refresh the dired buffer.