From: Dan Nicolaescu <dann@ics.uci.edu>
Date: Fri, 20 Jul 2007 00:19:49 +0000 (+0000)
Subject: (vc-print-log): Fix call to print-log.
X-Git-Tag: emacs-pretest-23.0.90~11831
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ee2f409bc14c0b2be3c64bf81ed29a07d8e38c44;p=emacs.git

(vc-print-log): Fix call to print-log.
(vc-default-comment-history): Likewise.
---

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))))