diff options
author | Lars Hansen <larsh@soem.dk> | 2004-05-05 08:01:17 +0000 |
---|---|---|
committer | Lars Hansen <larsh@soem.dk> | 2004-05-05 08:01:17 +0000 |
commit | c1aada0f2ab864ee91b0ab147231b09cb0fb5987 (patch) | |
tree | 7f651a323d971cd8b3c2b8978cbbdb0ea2f12570 /lisp/wdired.el | |
parent | db59ad435dcd3fb5df392848ad20b123aac65ff8 (diff) | |
download | emacs-c1aada0f2ab864ee91b0ab147231b09cb0fb5987.tar.gz |
(wdired-change-to-wdired-mode): Quote wdired-mode-hook in run-hooks.
Use substitute-command-keys in message.
(wdired-abort-changes): Add message.
Diffstat (limited to 'lisp/wdired.el')
-rw-r--r-- | lisp/wdired.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/wdired.el b/lisp/wdired.el index a8c36c2066f..30ba2a3cd45 100644 --- a/lisp/wdired.el +++ b/lisp/wdired.el @@ -329,8 +329,8 @@ See `wdired-mode'." (buffer-enable-undo) ; Performance hack. See above. (set-buffer-modified-p nil) (setq buffer-undo-list nil) - (run-hooks wdired-mode-hook) - (message "Press C-c C-c when finished")) + (run-hooks 'wdired-mode-hook) + (message (substitute-command-keys "Press \\[wdired-finish-edit] when finished"))) ;; Protect the buffer so only the filenames can be changed, and put @@ -416,7 +416,8 @@ non-nil means return old filename." (insert wdired-old-content)) (wdired-change-to-dired-mode) (set-buffer-modified-p nil) - (setq buffer-undo-list nil)) + (setq buffer-undo-list nil) + (message "Changes aborted")) (defun wdired-finish-edit () "Actually rename files based on your editing in the Dired buffer." |