Describe things at point.
This commit is contained in:
parent
adfb76c91d
commit
66d50d8466
1 changed files with 5 additions and 0 deletions
5
magit.el
5
magit.el
|
@ -179,6 +179,7 @@
|
|||
(define-key magit-keymap (kbd "a") 'magit-stage-thing-at-point)
|
||||
(define-key magit-keymap (kbd "u") 'magit-unstage-thing-at-point)
|
||||
(define-key magit-keymap (kbd "i") 'magit-ignore-thing-at-point)
|
||||
(define-key magit-keymap (kbd "?") 'magit-describe-thing-at-point)
|
||||
(define-key magit-keymap (kbd "x") 'magit-reset-soft)
|
||||
(define-key magit-keymap (kbd "X") 'magit-reset-hard)
|
||||
(define-key magit-keymap (kbd "RET") 'magit-visit-thing-at-point)
|
||||
|
@ -485,3 +486,7 @@
|
|||
(if position
|
||||
(goto-line position))))))))
|
||||
|
||||
(defun magit-describe-thing-at-point ()
|
||||
(interactive)
|
||||
(let ((info (get-char-property (point) 'magit-info)))
|
||||
(message "Thing: %s" info)))
|
||||
|
|
Loading…
Reference in a new issue