summaryrefslogtreecommitdiff
path: root/lisp/vc-hg.el
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2008-04-10 07:34:40 +0000
committerDan Nicolaescu <dann@ics.uci.edu>2008-04-10 07:34:40 +0000
commit7d3541789341856c6be840b9d94317a873c27410 (patch)
tree41202a0c557800893de03063859404c9c4f1c645 /lisp/vc-hg.el
parent7fbb47976eca08ae8fee6ac1a64ad961ef25d9f4 (diff)
downloademacs-7d3541789341856c6be840b9d94317a873c27410.tar.gz
(vc-hg-dir-status): Remove unneeded call.
Diffstat (limited to 'lisp/vc-hg.el')
-rw-r--r--lisp/vc-hg.el4
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)))