Mercurial > emacs
changeset 11591:5f3aa9df448e
(array-mode): Use force-mode-line-update.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Tue, 25 Apr 1995 22:33:13 +0000 |
parents | 97a90e900ce7 |
children | 030e5a06a38a |
files | lisp/array.el |
diffstat | 1 files changed, 1 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/array.el Tue Apr 25 22:32:49 1995 +0000 +++ b/lisp/array.el Tue Apr 25 22:33:13 1995 +0000 @@ -884,10 +884,7 @@ (array-init-local-variables) (setq major-mode 'array-mode) (setq mode-name "Array") - ;; Update mode-line. - (progn (save-excursion (set-buffer (other-buffer))) - (set-buffer-modified-p (buffer-modified-p)) - (sit-for 0)) + (force-mode-line-update) (make-variable-buffer-local 'truncate-lines) (setq truncate-lines t) (setq overwrite-mode t)