Key binding to print VC root log from VC dir

[Matthias Meulien <orontee@gmail.com>]

[-- Attachment #1: Type: text/plain, Size: 398 bytes --]

Severity: wishlist Tags: patch  From a buffer visiting a file 
under version control one has the following two key bindings to 
display logs:

          C-x v l runs the command vc-print-log

          C-x v L runs the command vc-print-root-log

From a buffer in `vc-dir-mode' one has the key binding:

          l runs the command vc-print-log

But there is no `vc-print-root-log' key binding...


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Key binding to print VC root log from VC dir --]
[-- Type: text/x-diff, Size: 886 bytes --]

From 58b23b29b45e2d3f17ed76e8ff010501d966d2c0 Mon Sep 17 00:00:00 2001
From: Matthias Meulien <orontee@gmail.com>
Date: Wed, 24 Jul 2013 23:39:51 +0200
Subject: [PATCH] lisp/vc/vc-dir.el (vc-dir-mode-map): Keybinding for
 vc-print-root-log

---
 lisp/vc/vc-dir.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el
index 80f7849..325e66e 100644
--- a/lisp/vc/vc-dir.el
+++ b/lisp/vc/vc-dir.el
@@ -240,6 +240,7 @@ See `run-hooks'."
     (define-key map "i" 'vc-register)	   ;; C-x v i
     (define-key map "+" 'vc-update)	   ;; C-x v +
     (define-key map "l" 'vc-print-log)	   ;; C-x v l
+    (define-key map "L" 'vc-print-root-log) ;; C-x v L
     ;; More confusing than helpful, probably
     ;;(define-key map "R" 'vc-revert) ;; u is taken by vc-dir-unmark.
     ;;(define-key map "A" 'vc-annotate) ;; g is taken by revert-buffer
-- 
1.8.3.3


[-- Attachment #3: Type: text/plain, Size: 34 bytes --]


Thanks for reading,
-- 
Matthias