diff lisp/vc-arch.el @ 94847:5e64dca662f0

Remove assumption about what nil means as a first arument to vc-do-command.
author Eric S. Raymond <esr@snark.thyrsus.com>
date Sat, 10 May 2008 13:27:16 +0000
parents ee5932bf781d
children 7df3d9a17631
line wrap: on
line diff
--- a/lisp/vc-arch.el	Sat May 10 13:09:04 2008 +0000
+++ b/lisp/vc-arch.el	Sat May 10 13:27:16 2008 +0000
@@ -426,7 +426,7 @@
 
 (defun vc-arch-command (buffer okstatus file &rest flags)
   "A wrapper around `vc-do-command' for use in vc-arch.el."
-  (apply 'vc-do-command buffer okstatus vc-arch-command file flags))
+  (apply 'vc-do-command (or buffer "*vc*") okstatus vc-arch-command file flags))
 
 (defun vc-arch-init-revision () nil)