mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-25 01:10:47 -08:00
Code Issues Projects Releases Wiki Activity

(isearch-mode, isearch-done): Use force-mode-line-update.

Browse source
This commit is contained in:
Karl Heuer 1995-04-25 22:28:40 +00:00
parent 2450bd29f6
commit 1cd3732c0a
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/isearch.el
View file

@ -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 @@ is treated as a regexp. See \\[isearch-forward] for more info."
(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 @@ is treated as a regexp. See \\[isearch-forward] for more info."
(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.