commit - 5fb2f47455079158990731f00c405d0fa88788a6
commit + 424f5152bad72242de91a2638f286596ec9e5659
blob - 64c938c066f8aca7aa53d002963fdc36f69a8fb5
blob + b9c71b275e017391ed6e836389e1b15f0a9dcf80
--- vc-got.el
+++ vc-got.el
;; - revision-completion-table DONE
;; - annotate-command DONE
;; - annotate-time DONE
-;; - annotate-current-time NOT IMPLEMENTED
+;; - annotate-current-time NOT NEEDED
+;; the default time handling is enough.
;; - annotate-extract-revision-at-line DONE
;; - region-history NOT IMPLEMENTED
;; - region-history-mode NOT IMPLEMENTED
(let ((default-directory (vc-got--repo-root)))
(vc-got--push-pull "git" "push" prompt)))
+
+;; History functions
+
(defun vc-got-print-log (files buffer &optional _shortlog start-revision limit)
"Insert the revision log for FILES into BUFFER.
LIMIT limits the number of commits, optionally starting at
(when (looking-at vc-got--annotate-re)
(match-string-no-properties 1))))
+
+;; Miscellaneous
+
(defun vc-got-previous-revision (file rev)
"Return the revision number that precedes REV for FILE, or nil if no such revision exists."
(with-temp-buffer