diff lisp/vc-hg.el @ 87604:26665fb0f604

(vc-hg-dir-state, vc-hg-dir-status): Pass the dir argument to vc-hg-command.
author Dan Nicolaescu <dann@ics.uci.edu>
date Mon, 07 Jan 2008 03:04:01 +0000
parents efe45ef69877
children 7ca7e531270c
line wrap: on
line diff
--- a/lisp/vc-hg.el	Sun Jan 06 21:34:57 2008 +0000
+++ b/lisp/vc-hg.el	Mon Jan 07 03:04:01 2008 +0000
@@ -184,7 +184,7 @@
 (defun vc-hg-dir-state (dir)
   (with-temp-buffer
     (buffer-disable-undo)		;; Because these buffers can get huge
-    (vc-hg-command (current-buffer) nil nil "status" "-A")
+    (vc-hg-command (current-buffer) nil dir "status" "-A")
     (goto-char (point-min))
     (let ((status-char nil)
 	  (file nil))
@@ -482,7 +482,7 @@
 (defun vc-hg-dir-status (dir)
   "Return a list of conses (file . state) for DIR."
   (with-temp-buffer
-    (vc-hg-command (current-buffer) nil nil "status" "-A")
+    (vc-hg-command (current-buffer) nil dir "status" "-A")
     (goto-char (point-min))
     (let ((status-char nil)
 	  (file nil)