# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 798848847 0
# Node ID 090333911dc8c372bba7eefcab914fbab2080ebb
# Parent  a956f12b250f31aec3f42bcc9a71ec00a77d75dd
(outline-minor-mode): Use force-mode-line-update.

diff -r a956f12b250f -r 090333911dc8 lisp/textmodes/ooutline.el
--- a/lisp/textmodes/ooutline.el	Tue Apr 25 22:26:54 1995 +0000
+++ b/lisp/textmodes/ooutline.el	Tue Apr 25 22:27:27 1995 +0000
@@ -249,7 +249,7 @@
   ;; When turning off outline mode, get rid of any ^M's.
   (or outline-minor-mode
       (outline-flag-region (point-min) (point-max) ?\n))
-  (set-buffer-modified-p (buffer-modified-p)))
+  (force-mode-line-update))
 
 (defvar outline-level 'outline-level
   "Function of no args to compute a header's nesting level in an outline.
diff -r a956f12b250f -r 090333911dc8 lisp/textmodes/outline.el
--- a/lisp/textmodes/outline.el	Tue Apr 25 22:26:54 1995 +0000
+++ b/lisp/textmodes/outline.el	Tue Apr 25 22:27:27 1995 +0000
@@ -257,7 +257,7 @@
   ;; When turning off outline mode, get rid of any outline hiding.
   (or outline-minor-mode
       (show-all))
-  (set-buffer-modified-p (buffer-modified-p)))
+  (force-mode-line-update))
 
 (defvar outline-level 'outline-level
   "Function of no args to compute a header's nesting level in an outline.