Fix behavior of with-temp-buffer-window (Bug#16816, Bug#17007).

[bpt/emacs.git] / lisp / dired.el

diff --git a/lisp/dired.el b/lisp/dired.el
index 2bf9f74..162c9be 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -3087,7 +3087,7 @@ argument or confirmation)."
       (apply function args)
     (let ((buffer (get-buffer-create (or buffer-or-name " *Marked Files*"))))
       (with-current-buffer buffer
-       (with-temp-buffer-window
+       (with-current-buffer-window
         buffer
         (cons 'display-buffer-below-selected
               '((window-height . fit-window-to-buffer)))