diff options
| author | Dan Nicolaescu <dann@ics.uci.edu> | 2008-07-01 14:47:10 +0000 |
|---|---|---|
| committer | Dan Nicolaescu <dann@ics.uci.edu> | 2008-07-01 14:47:10 +0000 |
| commit | 3cddaef1247931f3bfb3eccbab24027712c6b192 (patch) | |
| tree | 2fb73933392f97ee511969a8e136965064d2d9e9 /lisp/vc-annotate.el | |
| parent | 03953ed218dfe970442ab69eb6911e8b76ee5584 (diff) | |
| download | emacs-3cddaef1247931f3bfb3eccbab24027712c6b192.tar.gz emacs-3cddaef1247931f3bfb3eccbab24027712c6b192.tar.bz2 emacs-3cddaef1247931f3bfb3eccbab24027712c6b192.zip | |
(vc-annotate-mode-map): Bind to lower case keys.
Add binding for vc-annotate-show-changeset-diff-revision-at-line.
Diffstat (limited to 'lisp/vc-annotate.el')
| -rw-r--r-- | lisp/vc-annotate.el | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/lisp/vc-annotate.el b/lisp/vc-annotate.el index eadce2db957..63a99f1ea7f 100644 --- a/lisp/vc-annotate.el +++ b/lisp/vc-annotate.el @@ -118,15 +118,16 @@ List of factors, used to expand/compress the time scale. See `vc-annotate'." (defvar vc-annotate-mode-map (let ((m (make-sparse-keymap))) - (define-key m "A" 'vc-annotate-revision-previous-to-line) - (define-key m "D" 'vc-annotate-show-diff-revision-at-line) + (define-key m "a" 'vc-annotate-revision-previous-to-line) + (define-key m "d" 'vc-annotate-show-diff-revision-at-line) + (define-key m "D" 'vc-annotate-show-changeset-diff-revision-at-line) (define-key m "f" 'vc-annotate-find-revision-at-line) - (define-key m "J" 'vc-annotate-revision-at-line) - (define-key m "L" 'vc-annotate-show-log-revision-at-line) - (define-key m "N" 'vc-annotate-next-revision) - (define-key m "P" 'vc-annotate-prev-revision) - (define-key m "W" 'vc-annotate-working-revision) - (define-key m "V" 'vc-annotate-toggle-annotation-visibility) + (define-key m "j" 'vc-annotate-revision-at-line) + (define-key m "l" 'vc-annotate-show-log-revision-at-line) + (define-key m "n" 'vc-annotate-next-revision) + (define-key m "p" 'vc-annotate-prev-revision) + (define-key m "w" 'vc-annotate-working-revision) + (define-key m "v" 'vc-annotate-toggle-annotation-visibility) m) "Local keymap used for VC-Annotate mode.") |