Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-17 18:37:33 +00:00
Code Issues Projects Releases Packages Wiki Activity

(wdired-change-to-wdired-mode): Quote wdired-mode-hook in run-hooks.

Browse source 
Use substitute-command-keys in message.
(wdired-abort-changes): Add message.
This commit is contained in:
Lars Hansen 2004-05-05 08:01:53 +00:00
parent 9a9069c994
commit 2a93ca78ea
2 changed files with 10 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2004-05-05 Lars Hansen <larsh@math.ku.dk>
* wdired.el (wdired-change-to-wdired-mode): Quote wdired-mode-hook
in run-hooks. Use substitute-command-keys in message.
(wdired-abort-changes): Add message.
2004-05-03 Michael Mauger <mmaug@yahoo.com>
* emacs/lisp/progmodes/sql.el (sql-xemacs-p, sql-emacs19-p)

7
lisp/wdired.el
View file

@ -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."