diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-10-30 20:54:44 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-10-30 20:54:44 +0100 |
| commit | 4650aa3523068b83c3d9e6276fe89eb3955ca1e3 (patch) | |
| tree | 219c09341822f32c019e538088ca629047105d49 /lisp | |
| parent | f8134d2753e4abb7a12d87af731d2ad213bb5bd1 (diff) | |
| download | emacs-4650aa3523068b83c3d9e6276fe89eb3955ca1e3.tar.gz | |
Bind vc-git-stash to a key
* lisp/vc/vc-git.el (vc-git-stash-map): Give `vc-git-stash' a
keystroke, because it's a useful command.
When there are no stashes, there's no way to use that keystroke (since
it's only bound on the stash lines), so perhaps that should also be
fixed somehow.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/vc/vc-git.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el index ce8e57df768..e0b3b094626 100644 --- a/lisp/vc/vc-git.el +++ b/lisp/vc/vc-git.el @@ -648,6 +648,7 @@ or an empty string if none." (define-key map "A" 'vc-git-stash-apply-at-point) (define-key map "P" 'vc-git-stash-pop-at-point) (define-key map "S" 'vc-git-stash-snapshot) + (define-key map "C" 'vc-git-stash) map)) (defun vc-git--make-button-text (show count1 count2) @@ -1596,7 +1597,7 @@ This command shares argument histories with \\[rgrep] and \\[grep]." (autoload 'vc-dir-marked-files "vc-dir") (defun vc-git-stash (name) - "Create a stash." + "Create a stash given the name NAME." (interactive "sStash name: ") (let ((root (vc-git-root default-directory))) (when root |