# HG changeset patch
# User Brian Fox <bfox@gnu.org>
# Date 748596771 0
# Node ID a57b0b715c0436a8a283447a0c1dcf1b33fd1098
# Parent  5eaa5d4eaacad9034e010b3db23c8c76510bffb6
(outline-minor-mode): Force update of modeline when outline-minor-mode
is toggled.

diff -r 5eaa5d4eaaca -r a57b0b715c04 lisp/textmodes/ooutline.el
--- a/lisp/textmodes/ooutline.el	Tue Sep 21 07:23:26 1993 +0000
+++ b/lisp/textmodes/ooutline.el	Tue Sep 21 07:32:51 1993 +0000
@@ -194,7 +194,8 @@
       (progn
 	(setq selective-display t)
 	(run-hooks 'outline-minor-mode-hook))
-    (setq selective-display nil)))
+    (setq selective-display nil))
+  (set-buffer-modified-p (buffer-modified-p)))
 
 (defvar outline-level 'outline-level
   "Function of no args to compute a header's nesting level in an outline.