# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1208810451 0
# Node ID c8b73a9f4c36d3b3b862d292f509245cf942b047
# Parent  c09516cc5cf4939597f41d54e2999d142687fa45
(vc-dir): Use pop-to-buffer, so it can be customized.

diff -r c09516cc5cf4 -r c8b73a9f4c36 lisp/ChangeLog
--- a/lisp/ChangeLog	Mon Apr 21 20:28:45 2008 +0000
+++ b/lisp/ChangeLog	Mon Apr 21 20:40:51 2008 +0000
@@ -5,6 +5,8 @@
 
 2008-04-21  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* vc.el (vc-dir): Use pop-to-buffer, so it can be customized.
+
 	* minibuffer.el (completion-try-completion): Change magic symbol
 	property name.  Rename from minibuffer-try-completion.
 	(completion-all-completions): Rename from minibuffer-all-completions.
diff -r c09516cc5cf4 -r c8b73a9f4c36 lisp/vc.el
--- a/lisp/vc.el	Mon Apr 21 20:28:45 2008 +0000
+++ b/lisp/vc.el	Mon Apr 21 20:40:51 2008 +0000
@@ -2799,7 +2799,7 @@
 (defun vc-dir (dir)
   "Show the VC status for DIR."
   (interactive "DVC status for directory: ")
-  (switch-to-buffer (vc-dir-prepare-status-buffer dir))
+  (pop-to-buffer (vc-dir-prepare-status-buffer dir))
   (if (eq major-mode 'vc-dir-mode)
       (vc-dir-refresh)
     (vc-dir-mode)))