(vc-print-log): Fix call to print-log.

(vc-default-comment-history): Likewise.

2 files changed, 4 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dca9dd64364..9f8989bcc12 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -9,6 +9,8 @@
         (vc-hg-create-repo): Fix typos.
 
         * vc.el: Fix typo.
+        (vc-print-log): Fix call to print-log.
+        (vc-default-comment-history): Likewise.
 
         * vc-mcvs.el (vc-mcvs-create-repo): Fix typos.
 
diff --git a/lisp/vc.el b/lisp/vc.el
index b5ae94d8bdd..91caef0f4d6 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -2505,7 +2505,7 @@ If FOCUS-REV is non-nil, leave the point at that revision."
     ;; buffer can be accessed by the command.
     (condition-case err
         (progn
-          (vc-call print-log file "*vc-change-log*")
+          (vc-call print-log (list file) "*vc-change-log*")
           (set-buffer "*vc-change-log*"))
       (wrong-number-of-arguments
        ;; If this error came from the above call to print-log, try again
@@ -2547,7 +2547,7 @@ If FOCUS-REV is non-nil, leave the point at that revision."
   "Return a string with all log entries stored in BACKEND for FILE."
   (if (vc-find-backend-function backend 'print-log)
       (with-current-buffer "*vc*"
-        (vc-call print-log file)
+        (vc-call print-log (list file))
         (vc-call wash-log file)
         (buffer-string))))