Commit a44d450b authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(vc-arch-revision-completion-table): Make it work when the

arg is a list of files.
parent 4bb49b43
2007-10-20 Stefan Monnier <monnier@iro.umontreal.ca>
* vc-arch.el (vc-arch-revision-completion-table): Make it work when the
arg is a list of files.
2007-10-19 Stefan Monnier <monnier@iro.umontreal.ca>
* vc.el: Remove `diff-tree' operation, now subsumed by `diff'.
......
......@@ -442,11 +442,11 @@ Return non-nil if FILE is unchanged."
(concat "*/" string))
"*"))))))
(defun vc-arch-revision-completion-table (file)
(lexical-let ((file file))
(defun vc-arch-revision-completion-table (files)
(lexical-let ((files files))
(lambda (string pred action)
;; FIXME: complete revision patches as well.
(let* ((root (expand-file-name "{arch}" (vc-arch-root file)))
(let* ((root (expand-file-name "{arch}" (vc-arch-root (car files))))
(table (vc-arch--version-completion-table root string)))
(complete-with-action action table string pred)))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment