* xmenu.c: Revert last change.

[gnu-emacs] / lisp / wdired.el

diff --git a/lisp/wdired.el b/lisp/wdired.el
index fe14bce1785d6adf8eff211c36f529a0d61c1c86..e2d6a4b85b8eca7b0c77e75708b3c4f4e26db1cb 100644 (file)
--- a/lisp/wdired.el
+++ b/lisp/wdired.el
@@ -503,12 +503,11 @@ and proceed depending on the answer."
         (setq curr-filename (wdired-get-filename nil t))
         (if (equal curr-filename filename-ori)
             (progn
-              (setq exit-while t)
+              (setq done t)
               (let ((inhibit-read-only t))
                 (dired-move-to-filename)
                 (search-forward (wdired-get-filename t) nil t)
                 (replace-match (file-name-nondirectory filename-ori) t t))
-              (setq done)
               (dired-do-create-files-regexp
                (function dired-rename-file)
                "Move" 1 ".*" filename-new nil t))