# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 798849112 0
# Node ID cf1d828dbb57415644300e48658dce2269e8f9b1
# Parent  fba74d0549799df5ad53eb6321dd7d6dbf3792ef
(dired-sort-set-modeline): Use force-mode-line-update.

diff -r fba74d054979 -r cf1d828dbb57 lisp/dired.el
--- a/lisp/dired.el	Tue Apr 25 22:31:12 1995 +0000
+++ b/lisp/dired.el	Tue Apr 25 22:31:52 1995 +0000
@@ -2154,8 +2154,7 @@
 		 "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.