summaryrefslogtreecommitdiff
path: root/lisp/vc-hooks.el
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2007-07-20 01:22:18 +0000
committerDan Nicolaescu <dann@ics.uci.edu>2007-07-20 01:22:18 +0000
commitc0edfa75c48d19c878dc63cd0941a56653adfeb4 (patch)
tree40c1e4d678453d90d1199ec02f785263cb565b71 /lisp/vc-hooks.el
parentee2f409bc14c0b2be3c64bf81ed29a07d8e38c44 (diff)
downloademacs-c0edfa75c48d19c878dc63cd0941a56653adfeb4.tar.gz
* vc-hooks.el (vc-default-workfile-unchanged-p): Pass a list
instead of a file. * vc-hg.el (vc-hg-print-log): Fix for multiple files. * vc.el: (vc-directory-exclusion-list): Add .hg and .bzr. (vc-diff-internal): Pass a list instead of a file.
Diffstat (limited to 'lisp/vc-hooks.el')
-rw-r--r--lisp/vc-hooks.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index 19b309ee203..83f9903e664 100644
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -528,7 +528,7 @@ Return non-nil if FILE is unchanged."
(zerop (condition-case err
;; If the implementation supports it, let the output
;; go to *vc*, not *vc-diff*, since this is an internal call.
- (vc-call diff file nil nil "*vc*")
+ (vc-call diff (list file) nil nil "*vc*")
(wrong-number-of-arguments
;; If this error came from the above call to vc-BACKEND-diff,
;; try again without the optional buffer argument (for
@@ -539,7 +539,7 @@ Return non-nil if FILE is unchanged."
'diff))))
(not (eq (caddr err) 4)))
(signal (car err) (cdr err))
- (vc-call diff file))))))
+ (vc-call diff (list file)))))))
(defun vc-workfile-version (file)
"Return the repository version from which FILE was checked out.