changeset 100362:4150ab3a5845

(dired-pop-to-buffer): Call with min-height arg 1 to make sure that small buffers get shown.
author Martin Rudalics <rudalics@gmx.at>
date Thu, 11 Dec 2008 17:19:37 +0000
parents ecf3d51be3b3
children cf73b85610ac
files lisp/dired.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/dired.el	Thu Dec 11 17:17:44 2008 +0000
+++ b/lisp/dired.el	Thu Dec 11 17:19:37 2008 +0000
@@ -2681,7 +2681,9 @@
   (pop-to-buffer (get-buffer-create buf))
   ;; If dired-shrink-to-fit is t, make its window fit its contents.
   (when dired-shrink-to-fit
-    (fit-window-to-buffer (get-buffer-window buf))))
+    ;; Try to not delete window when we want to display less than
+    ;; `window-min-height' lines.
+    (fit-window-to-buffer (get-buffer-window buf) nil 1)))
 
 (defcustom dired-no-confirm nil
   "A list of symbols for commands Dired should not confirm.