Mercurial > emacs
changeset 11592:030e5a06a38a
(appt-check): Use force-mode-line-update.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Tue, 25 Apr 1995 22:33:23 +0000 |
parents | 5f3aa9df448e |
children | f5385353aae3 |
files | lisp/calendar/appt.el |
diffstat | 1 files changed, 1 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calendar/appt.el Tue Apr 25 22:33:13 1995 +0000 +++ b/lisp/calendar/appt.el Tue Apr 25 22:33:23 1995 +0000 @@ -337,10 +337,7 @@ (concat "App't in " min-to-app " min. " new-time " ")) - ;; force mode line updates - from time.el - - (save-excursion (set-buffer (other-buffer))) - (set-buffer-modified-p (buffer-modified-p)) + (force-mode-line-update t) (sit-for 0))) (if (= min-to-app 0)