Mercurial > emacs

changeset 11575:090333911dc8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(outline-minor-mode): Use force-mode-line-update.
author Karl Heuer <kwzh@gnu.org>
date Tue, 25 Apr 1995 22:27:27 +0000
parents a956f12b250f
children f0906608aa63
files lisp/textmodes/ooutline.el lisp/textmodes/outline.el
diffstat 2 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- 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.
--- 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.