47 |
("z" . kill-this-buffer) |
("z" . kill-this-buffer) |
48 |
("m" . set-mark-command) |
("m" . set-mark-command) |
49 |
("d" . log-view-diff) |
("d" . log-view-diff) |
50 |
|
("f" . log-view-find-version) |
51 |
("n" . log-view-msg-next) |
("n" . log-view-msg-next) |
52 |
("p" . log-view-msg-prev) |
("p" . log-view-msg-prev) |
53 |
("N" . log-view-file-next) |
("N" . log-view-file-next) |
174 |
(cvs-force-command "/F")) |
(cvs-force-command "/F")) |
175 |
(funcall f)))) |
(funcall f)))) |
176 |
|
|
177 |
|
(defun log-view-find-version (pos) |
178 |
|
"Visit the version at point." |
179 |
|
(interactive "d") |
180 |
|
(save-excursion |
181 |
|
(goto-char pos) |
182 |
|
(switch-to-buffer (vc-find-version (log-view-current-file) |
183 |
|
(log-view-current-tag))))) |
184 |
|
|
185 |
;;; |
;;; |
186 |
;;; diff |
;;; diff |
187 |
;;; |
;;; |