Mercurial > emacs

changeset 11579:28e4495a9e8f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(isearch-mode, isearch-done): Use force-mode-line-update.
author Karl Heuer <kwzh@gnu.org>
date Tue, 25 Apr 1995 22:28:40 +0000
parents d8480e4513ea
children 7f357fe2cda5
files lisp/isearch.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/isearch.el	Tue Apr 25 22:28:25 1995 +0000
+++ b/lisp/isearch.el	Tue Apr 25 22:28:40 1995 +0000
@@ -4,7 +4,7 @@
 
 ;; Author: Daniel LaLiberte <liberte@cs.uiuc.edu>
 
-;; |$Date: 1995/04/14 17:59:59 $|$Revision: 1.88 $
+;; |$Date: 1995/04/24 15:27:35 $|$Revision: 1.89 $
 
 ;; This file is part of GNU Emacs.
 
@@ -495,7 +495,7 @@
 	(if isearch-slow-terminal-mode (current-window-configuration) nil))
 
   (setq	isearch-mode " Isearch")  ;; forward? regexp?
-  (set-buffer-modified-p (buffer-modified-p)) ; update modeline
+  (force-mode-line-update)
 
   (isearch-push-state)
 
@@ -581,7 +581,7 @@
 		  (message "Mark saved where search started"))))))
 
   (setq isearch-mode nil)
-  (set-buffer-modified-p (buffer-modified-p))  ;; update modeline
+  (force-mode-line-update)
 
   (if (and (> (length isearch-string) 0) (not nopush))
       ;; Update the ring data.