Commit 837b0e99 authored by Dan Nicolaescu's avatar Dan Nicolaescu
Browse files

* vc-mtn.el (vc-mtn-annotate-command):

* vc-svn.el (vc-svn-annotate-command): Run asynchronously.
parent 32ba3abc
......@@ -22,6 +22,9 @@
* vc-svn.el (vc-svn-print-log): Add an optional argument shortlog
that is ignored for now.
* vc-mtn.el (vc-mtn-annotate-command):
* vc-svn.el (vc-svn-annotate-command): Run asynchronously.
2009-09-14 Stefan Monnier <>
* simple.el: Add mapping for backspace/delete/clear/tab/escape/return
......@@ -221,7 +221,7 @@ If nil, use the value of `vc-diff-switches'. If t, use no switches."
(if rev1 (list "-r" rev1)) (if rev2 (list "-r" rev2)))))
(defun vc-mtn-annotate-command (file buf &optional rev)
(apply 'vc-mtn-command buf 0 file "annotate"
(apply 'vc-mtn-command buf 'async file "annotate"
(if rev (list "-r" rev))))
(declare-function vc-annotate-convert-time "vc-annotate" (time))
......@@ -688,7 +688,7 @@ information about FILENAME and return its status."
;; Support for `svn annotate'
(defun vc-svn-annotate-command (file buf &optional rev)
(vc-svn-command buf 0 file "annotate" (if rev (concat "-r" rev))))
(vc-svn-command buf 'async file "annotate" (if rev (concat "-r" rev))))
(defun vc-svn-annotate-time-of-rev (rev)
;; Arbitrarily assume 10 commmits per day.
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