(vc-hg-dir-status): Remove unneeded call.

2 files changed, 3 insertions, 3 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 09ed4033594..a7aeb668041 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -20,6 +20,8 @@
         * vc-svn.el (vc-svn-after-dir-status, vc-svn-parse-status):
         Detect the conflict state.
 
+        * vc-hg.el (vc-hg-dir-status): Remove unneeded call.
+
 2008-04-10  Glenn Morris  <rgm@gnu.org>
 
         * Makefile.in (MH_E_DIR): New variable.
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)))