321 |
;; vc-BACKEND-diff. The default implementation does an explicit tree |
;; vc-BACKEND-diff. The default implementation does an explicit tree |
322 |
;; walk, calling vc-BACKEND-diff for each individual file. |
;; walk, calling vc-BACKEND-diff for each individual file. |
323 |
;; |
;; |
324 |
;; - annotate-command (file buf rev) |
;; - annotate-command (file buf &optional rev) |
325 |
;; |
;; |
326 |
;; If this function is provided, it should produce an annotated version |
;; If this function is provided, it should produce an annotated display |
327 |
;; of FILE in BUF, relative to version REV. This is currently only |
;; of FILE in BUF, relative to version REV. Annotation means each line |
328 |
;; implemented for CVS, using the `cvs annotate' command. |
;; of FILE displayed is prefixed with version information associated with |
329 |
|
;; its addition (deleted lines leave no history) and that the text of the |
330 |
|
;; file is fontified according to age. |
331 |
;; |
;; |
332 |
;; - annotate-time () |
;; - annotate-time () |
333 |
;; |
;; |
647 |
:type '(repeat number) |
:type '(repeat number) |
648 |
:group 'vc) |
:group 'vc) |
649 |
|
|
|
;; vc-annotate functionality (CVS only). |
|
650 |
(defvar vc-annotate-mode-map |
(defvar vc-annotate-mode-map |
651 |
(let ((m (make-sparse-keymap))) |
(let ((m (make-sparse-keymap))) |
652 |
(define-key m [menu-bar] (make-sparse-keymap "VC-Annotate")) |
(define-key m [menu-bar] (make-sparse-keymap "VC-Annotate")) |