Mercurial > emacs
changeset 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 | 91ea9f8cc64f |
| children | 7ca7e531270c |
| files | lisp/ChangeLog lisp/vc-hg.el |
| diffstat | 2 files changed, 7 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Jan 06 21:34:57 2008 +0000 +++ b/lisp/ChangeLog Mon Jan 07 03:04:01 2008 +0000 @@ -1,3 +1,8 @@ +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.
--- 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)