Mercurial > emacs
comparison lisp/vc-svn.el @ 96252:8c22ce277d5d
(vc-annotate-parent-rev): Pacify byte compiler.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Wed, 25 Jun 2008 02:45:50 +0000 |
| parents | 243cf028ce86 |
| children | 343227fc64ed |
comparison
equal
deleted
inserted
replaced
| 96251:a4c4b4d13902 | 96252:8c22ce277d5d |
|---|---|
| 668 | 668 |
| 669 (defun vc-svn-annotate-time-of-rev (rev) | 669 (defun vc-svn-annotate-time-of-rev (rev) |
| 670 ;; Arbitrarily assume 10 commmits per day. | 670 ;; Arbitrarily assume 10 commmits per day. |
| 671 (/ (string-to-number rev) 10.0)) | 671 (/ (string-to-number rev) 10.0)) |
| 672 | 672 |
| 673 (defvar vc-annotate-parent-rev) | |
| 674 | |
| 673 (defun vc-svn-annotate-current-time () | 675 (defun vc-svn-annotate-current-time () |
| 674 (vc-svn-annotate-time-of-rev vc-annotate-parent-rev)) | 676 (vc-svn-annotate-time-of-rev vc-annotate-parent-rev)) |
| 675 | 677 |
| 676 (defconst vc-svn-annotate-re "[ \t]*\\([0-9]+\\)[ \t]+[^\t ]+ ") | 678 (defconst vc-svn-annotate-re "[ \t]*\\([0-9]+\\)[ \t]+[^\t ]+ ") |
| 677 | 679 |