changeset 11585:e28ae3856c1d

(find-dired-sentinel): Use force-mode-line-update.
author Karl Heuer <kwzh@gnu.org>
date Tue, 25 Apr 1995 22:30:38 +0000
parents 3391bf365efa
children fba74d054979
files lisp/find-dired.el
diffstat 1 files changed, 3 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/find-dired.el	Tue Apr 25 22:30:13 1995 +0000
+++ b/lisp/find-dired.el	Tue Apr 25 22:30:38 1995 +0000
@@ -6,8 +6,8 @@
 ;;	   Sebastian Kremer <sk@thp.uni-koeln.de>
 ;; Keywords: unix
 
-(defconst find-dired-version (substring "$Revision: 1.19 $" 11 -2)
-  "$Id: find-dired.el,v 1.19 1995/03/06 19:55:47 roland Exp rms $")
+(defconst find-dired-version (substring "$Revision: 1.20 $" 11 -2)
+  "$Id: find-dired.el,v 1.20 1995/03/16 04:27:11 rms Exp kwzh $")
 
 ;;; This program is free software; you can redistribute it and/or modify
 ;;; it under the terms of the GNU General Public License as published by
@@ -188,8 +188,7 @@
 	      ;; process is dead, we can delete it now.  Otherwise it
 	      ;; will stay around until M-x list-processes.
 	      (delete-process proc)
-	      ;; Force mode line redisplay soon.
-	      (set-buffer-modified-p (buffer-modified-p))))
+	      (force-mode-line-update)))
 	  (message "find-dired %s finished." (current-buffer))))))
 
 (provide 'find-dired)