Fix cancellation of Wdired

* lisp/wdired.el (wdired-abort-changes): Call 'dired-revert'.
Patch by Stephen Berman <stephen.berman@gmx.net>.  (Bug#63676)

diff --git a/lisp/wdired.el b/lisp/wdired.el
index 5572dcb32f3adcc0e7a2702ddb11e5dab7e0e567..9952da710783b03c3362fa5b7a68f87a4d5b0961 100644 (file)
--- a/lisp/wdired.el
+++ b/lisp/wdired.el
@@ -470,6 +470,9 @@ non-nil means return old filename."
     (insert wdired--old-content)
     (goto-char wdired--old-point))
   (wdired-change-to-dired-mode)
+  ;; Make sure the display is in synch, and all the variables are set
+  ;; correctly.
+  (dired-revert)
   (set-buffer-modified-p nil)
   (setq buffer-undo-list nil)
   (message "Changes aborted"))