vc-hg: Perform the print-log call asynchronously

* lisp/vc/vc-hg.el (vc-hg-print-log): Perform the call
asynchronously (bug#21067).

diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el
index 556174a38219d33b5fc81853720396d24d92eb31..f634e2eac53fcafe5264144876edb593e6947784 100644 (file)
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -272,7 +272,7 @@ If LIMIT is non-nil, show no more than this many entries."
   (let ((inhibit-read-only t))
     (with-current-buffer
        buffer
-      (apply 'vc-hg-command buffer 0 files "log"
+      (apply 'vc-hg-command buffer 'async files "log"
             (nconc
              (when start-revision (list (format "-r%s:0" start-revision)))
              (when limit (list "-l" (format "%s" limit)))