Commit 70b58c47 authored by Dan Nicolaescu's avatar Dan Nicolaescu
Browse files

(vc-hg-dir-state, vc-hg-dir-status): Pass the dir

argument to vc-hg-command.
parent ee2e9728
2008-01-07 Dan Nicolaescu <dann@ics.uci.edu>
* vc-hg.el (vc-hg-dir-state, vc-hg-dir-status): Pass the dir
argument to vc-hg-command.
2008-01-06 Stefan Monnier <monnier@iro.umontreal.ca>
* vc.el (vc-ensure-vc-buffer): Check liveness of vc-parent-buffer.
......
......@@ -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 @@ REV is the revision to check out into WORKFILE."
(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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment