# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 798848776 0
# Node ID 09d49f6e0af9008e4ff9284170b21600841d9ee0
# Parent  771bd7ddd4ccc44dd4257bef599a860208abdbb4
(auto-fill-mode): Use force-mode-line-update.

diff -r 771bd7ddd4cc -r 09d49f6e0af9 lisp/simple.el
--- a/lisp/simple.el	Tue Apr 25 22:25:51 1995 +0000
+++ b/lisp/simple.el	Tue Apr 25 22:26:16 1995 +0000
@@ -2320,8 +2320,7 @@
 		       (> (prefix-numeric-value arg) 0))
 		   'do-auto-fill
 		   nil))
-    ;; update mode-line
-    (set-buffer-modified-p (buffer-modified-p))))
+    (force-mode-line-update)))
 
 ;; This holds a document string used to document auto-fill-mode.
 (defun auto-fill-function ()