comparison lisp/textmodes/outline.el @ 11575:090333911dc8

(outline-minor-mode): Use force-mode-line-update.
author Karl Heuer <kwzh@gnu.org>
date Tue, 25 Apr 1995 22:27:27 +0000
parents 4235784197f3
children 290970a12db9
comparison
equal deleted inserted replaced
11574:a956f12b250f 11575:090333911dc8
255 ;; Cause use of ellipses for invisible text. 255 ;; Cause use of ellipses for invisible text.
256 (setq buffer-invisibility-spec t)) 256 (setq buffer-invisibility-spec t))
257 ;; When turning off outline mode, get rid of any outline hiding. 257 ;; When turning off outline mode, get rid of any outline hiding.
258 (or outline-minor-mode 258 (or outline-minor-mode
259 (show-all)) 259 (show-all))
260 (set-buffer-modified-p (buffer-modified-p))) 260 (force-mode-line-update))
261 261
262 (defvar outline-level 'outline-level 262 (defvar outline-level 'outline-level
263 "Function of no args to compute a header's nesting level in an outline. 263 "Function of no args to compute a header's nesting level in an outline.
264 It can assume point is at the beginning of a header line.") 264 It can assume point is at the beginning of a header line.")
265 265