diff options
Diffstat (limited to 'lisp/vc/vc-dir.el')
| -rw-r--r-- | lisp/vc/vc-dir.el | 16 |
1 files changed, 6 insertions, 10 deletions
diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el index 9335da10065..068a66b25b8 100644 --- a/lisp/vc/vc-dir.el +++ b/lisp/vc/vc-dir.el | |||
| @@ -1467,17 +1467,13 @@ These are the commands available for use in the file status buffer: | |||
| 1467 | (propertize "Please add backend specific headers here. It's easy!" | 1467 | (propertize "Please add backend specific headers here. It's easy!" |
| 1468 | 'face 'vc-dir-status-warning))) | 1468 | 'face 'vc-dir-status-warning))) |
| 1469 | 1469 | ||
| 1470 | (defvar vc-dir-status-mouse-map | 1470 | (defvar-keymap vc-dir-status-mouse-map |
| 1471 | (let ((map (make-sparse-keymap))) | 1471 | :doc "Local keymap for toggling mark." |
| 1472 | (define-key map [mouse-2] #'vc-dir-toggle-mark) | 1472 | "<mouse-2>" #'vc-dir-toggle-mark) |
| 1473 | map) | ||
| 1474 | "Local keymap for toggling mark.") | ||
| 1475 | 1473 | ||
| 1476 | (defvar vc-dir-filename-mouse-map | 1474 | (defvar-keymap vc-dir-filename-mouse-map |
| 1477 | (let ((map (make-sparse-keymap))) | 1475 | :doc "Local keymap for visiting a file." |
| 1478 | (define-key map [mouse-2] #'vc-dir-find-file-other-window) | 1476 | "<mouse-2>" #'vc-dir-find-file-other-window) |
| 1479 | map) | ||
| 1480 | "Local keymap for visiting a file.") | ||
| 1481 | 1477 | ||
| 1482 | (defun vc-default-dir-printer (_backend fileentry) | 1478 | (defun vc-default-dir-printer (_backend fileentry) |
| 1483 | "Pretty print FILEENTRY." | 1479 | "Pretty print FILEENTRY." |