Mercurial > emacs
changeset 55970:58340ec919e5
(dired-undo): Call `dired-build-subdir-alist'.
Limit scope of `buffer-read-only' binding.
| author | Luc Teirlinck <teirllm@auburn.edu> |
|---|---|
| date | Mon, 07 Jun 2004 18:25:46 +0000 |
| parents | bbba5d83d7d3 |
| children | 6a67be936dd2 |
| files | lisp/dired.el |
| diffstat | 1 files changed, 5 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/dired.el Mon Jun 07 10:02:47 2004 +0000 +++ b/lisp/dired.el Mon Jun 07 18:25:46 2004 +0000 @@ -1448,14 +1448,13 @@ (defun dired-undo () "Undo in a dired buffer. This doesn't recover lost files, it just undoes changes in the buffer itself. -You can use it to recover marks, killed lines or subdirs. -In the latter case, you have to do \\[dired-build-subdir-alist] to -parse the buffer again." +You can use it to recover marks, killed lines or subdirs." (interactive) (let (buffer-read-only) - (undo) - (message "Change in Dired buffer undone. -Actual changes in files cannot be undone by Emacs."))) + (undo)) + (dired-build-subdir-alist) + (message "Change in Dired buffer undone. +Actual changes in files cannot be undone by Emacs.")) (defun dired-next-line (arg) "Move down lines then position at filename.