diff options
author | Dan Nicolaescu <dann@ics.uci.edu> | 2008-04-10 07:34:40 +0000 |
---|---|---|
committer | Dan Nicolaescu <dann@ics.uci.edu> | 2008-04-10 07:34:40 +0000 |
commit | 7d3541789341856c6be840b9d94317a873c27410 (patch) | |
tree | 41202a0c557800893de03063859404c9c4f1c645 /lisp/vc-hg.el | |
parent | 7fbb47976eca08ae8fee6ac1a64ad961ef25d9f4 (diff) | |
download | emacs-7d3541789341856c6be840b9d94317a873c27410.tar.gz |
(vc-hg-dir-status): Remove unneeded call.
Diffstat (limited to 'lisp/vc-hg.el')
-rw-r--r-- | lisp/vc-hg.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/vc-hg.el b/lisp/vc-hg.el index 8be1be82eec..2a65691cb9d 100644 --- a/lisp/vc-hg.el +++ b/lisp/vc-hg.el @@ -487,7 +487,7 @@ REV is the revision to check out into WORKFILE." (?! . missing) (?? . unregistered))) (translated nil) - (result nil)) + (result nil)) (goto-char (point-min)) (while (not (eobp)) (setq status-char (char-after)) @@ -502,8 +502,6 @@ REV is the revision to check out into WORKFILE." ;; XXX Experimental function for the vc-dired replacement. (defun vc-hg-dir-status (dir update-function status-buffer) - "Return a list of conses (file . state) for DIR." - (erase-buffer) (vc-hg-command (current-buffer) 'async dir "status") (vc-exec-after `(vc-hg-after-dir-status (quote ,update-function) ,status-buffer))) |