changeset 55371:a96e9558b1ea

(wdired-change-to-wdired-mode): Quote wdired-mode-hook in run-hooks. Use substitute-command-keys in message. (wdired-abort-changes): Add message.
author Lars Hansen <larsh@soem.dk>
date Wed, 05 May 2004 08:01:17 +0000
parents f714f103b48a
children 274f839cf7a8
files lisp/wdired.el
diffstat 1 files changed, 4 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/wdired.el	Tue May 04 21:59:40 2004 +0000
+++ b/lisp/wdired.el	Wed May 05 08:01:17 2004 +0000
@@ -329,8 +329,8 @@
   (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 @@
     (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."