diff options
| author | Karl Heuer <kwzh@gnu.org> | 1995-04-25 22:30:38 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1995-04-25 22:30:38 +0000 |
| commit | 6bb195f6d718543141b9f5e5627d9f2e32475b1b (patch) | |
| tree | 3346de14e993512b4e5097ce2bc8ce34cd816beb | |
| parent | bc69c4a8f2cc79f1889b6e892542578fcfabeaef (diff) | |
| download | emacs-6bb195f6d718543141b9f5e5627d9f2e32475b1b.tar.gz | |
(find-dired-sentinel): Use force-mode-line-update.
| -rw-r--r-- | lisp/find-dired.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/find-dired.el b/lisp/find-dired.el index 427f82a9d6a..1401603607e 100644 --- a/lisp/find-dired.el +++ b/lisp/find-dired.el @@ -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 @@ Thus ARG can also contain additional grep options." ;; 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) |