Commit 74def44f authored by Karl Heuer's avatar Karl Heuer
Browse files

(find-dired-sentinel): Use force-mode-line-update.

parent a716ac73
...@@ -6,8 +6,8 @@ ...@@ -6,8 +6,8 @@
;; Sebastian Kremer <sk@thp.uni-koeln.de> ;; Sebastian Kremer <sk@thp.uni-koeln.de>
;; Keywords: unix ;; Keywords: unix
(defconst find-dired-version (substring "$Revision: 1.19 $" 11 -2) (defconst find-dired-version (substring "$Revision: 1.20 $" 11 -2)
"$Id: find-dired.el,v 1.19 1995/03/06 19:55:47 roland Exp rms $") "$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 ;;; 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 ;;; it under the terms of the GNU General Public License as published by
...@@ -188,8 +188,7 @@ Thus ARG can also contain additional grep options." ...@@ -188,8 +188,7 @@ Thus ARG can also contain additional grep options."
;; process is dead, we can delete it now. Otherwise it ;; process is dead, we can delete it now. Otherwise it
;; will stay around until M-x list-processes. ;; will stay around until M-x list-processes.
(delete-process proc) (delete-process proc)
;; Force mode line redisplay soon. (force-mode-line-update)))
(set-buffer-modified-p (buffer-modified-p))))
(message "find-dired %s finished." (current-buffer)))))) (message "find-dired %s finished." (current-buffer))))))
(provide 'find-dired) (provide 'find-dired)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment