From: Glenn Morris <rgm@gnu.org>
Date: Wed, 19 May 2010 03:01:24 +0000 (-0700)
Subject: * vc-dir.el (vc-dir): Don't pop-up-windows.  (Bug#6204)
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~205^2~59
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d24e10b1b2e691ea2666ebd5439e99b6e7c41f60;p=emacs.git

* vc-dir.el (vc-dir): Don't pop-up-windows.  (Bug#6204)
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 545311d6530..8626457166a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,8 +1,11 @@
+2010-05-19  Glenn Morris  <rgm@gnu.org>
+
+	* vc-dir.el (vc-dir): Don't pop-up-windows.  (Bug#6204)
+
 2010-05-19  Kenichi Handa  <handa@m17n.org>
 
 	* composite.el: Register compose-gstring-for-graphic in
-	composition-function-table only for combining characters (Mn, Mc,
-	Me).
+	composition-function-table only for combining characters (Mn, Mc, Me).
 
 2010-05-18  Jay Belanger  <jay.p.belanger@gmail.com>
 
diff --git a/lisp/vc-dir.el b/lisp/vc-dir.el
index f24e627de64..5809110e5b5 100644
--- a/lisp/vc-dir.el
+++ b/lisp/vc-dir.el
@@ -1169,7 +1169,8 @@ These are the commands available for use in the file status buffer:
 	  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'.