diff lisp/vc-dir.el @ 108695:136a119bc981

* vc-dir.el (vc-dir): Don't pop-up-windows. (Bug#6204)
author Glenn Morris <rgm@gnu.org>
date Tue, 18 May 2010 20:01:24 -0700
parents 4d8277a44bb4
children 46a99dfe8970
line wrap: on
line diff
--- a/lisp/vc-dir.el	Tue May 18 19:56:44 2010 -0700
+++ b/lisp/vc-dir.el	Tue May 18 20:01:24 2010 -0700
@@ -1169,7 +1169,8 @@
 	  nil t nil nil)))))
   (unless backend
     (setq backend (vc-responsible-backend dir)))
-  (pop-to-buffer (vc-dir-prepare-status-buffer "*vc-dir*" dir backend))
+  (let (pop-up-windows)		      ; based on cvs-examine; bug#6204
+    (pop-to-buffer (vc-dir-prepare-status-buffer "*vc-dir*" dir backend)))
   (if (derived-mode-p 'vc-dir-mode)
       (vc-dir-refresh)
     ;; FIXME: find a better way to pass the backend to `vc-dir-mode'.