Mercurial > emacs

changeset 25218:9c0733c601c9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(view-mode-enable, view-mode-disable): Call force-mode-line-update.
author Karl Heuer <kwzh@gnu.org>
date Tue, 10 Aug 1999 16:37:57 +0000
parents e1f1f34e98a7
children 1b99ab7ab219
files lisp/view.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/view.el	Tue Aug 10 13:48:24 1999 +0000
+++ b/lisp/view.el	Tue Aug 10 16:37:57 1999 +0000
@@ -447,12 +447,14 @@
 		(if (buffer-file-name)
 		    (file-name-nondirectory (buffer-file-name))
 		  (buffer-name))))
+  (force-mode-line-update)
   (run-hooks 'view-mode-hook))
 
 (defun view-mode-disable ()
   "Turn off View mode."
   (remove-hook 'change-major-mode-hook 'view-mode-disable t)
   (and view-overlay (delete-overlay view-overlay))
+  (force-mode-line-update)
   (setq view-mode nil
 	Helper-return-blurb view-old-Helper-return-blurb
 	buffer-read-only view-old-buffer-read-only))