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
commitd4bf8f5e77c9bf9466f03a985cdd45f101278af8 (patch)
tree8e3f11a82d8363aa29f1ecf52d0df8b7705d060c /lisp/vc-hooks.el
parent4f9ac768112d3e07754a8611712f7c97b8cedd83 (diff)
downloademacs-d4bf8f5e77c9bf9466f03a985cdd45f101278af8.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.