diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-06-17 10:35:05 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-06-17 11:25:34 +0200 |
| commit | c89dc27c2c2157dd1704f9e4ab7b9adeb4d232da (patch) | |
| tree | ef0959a4bee79c4c61401c419352f17537c95a80 /lisp | |
| parent | c0288145895f6addd37ecb6585ffa0f4733b2328 (diff) | |
| download | emacs-c89dc27c2c2157dd1704f9e4ab7b9adeb4d232da.tar.gz | |
Add doc strings to the -at-point commands in vc-git
* lisp/vc/vc-git.el (vc-git-stash-delete-at-point)
(vc-git-stash-show-at-point, vc-git-stash-apply-at-point)
(vc-git-stash-pop-at-point): Add doc strings to these commands.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/vc/vc-git.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el index 61c13026cc5..30ec712cfc1 100644 --- a/lisp/vc/vc-git.el +++ b/lisp/vc/vc-git.el @@ -1566,6 +1566,7 @@ This command shares argument histories with \\[rgrep] and \\[grep]." (declare-function vc-dir-refresh "vc-dir" ()) (defun vc-git-stash-delete-at-point () + "Delete the stash at point." (interactive) (let ((stash (vc-git-stash-get-at-point (point)))) (when (y-or-n-p (format "Remove stash %s ? " stash)) @@ -1573,16 +1574,19 @@ This command shares argument histories with \\[rgrep] and \\[grep]." (vc-dir-refresh)))) (defun vc-git-stash-show-at-point () + "Show the stash at point." (interactive) (vc-git-stash-show (format "stash@%s" (vc-git-stash-get-at-point (point))))) (defun vc-git-stash-apply-at-point () + "Apply the stash at point." (interactive) (let (vc-dir-buffers) ; Small optimization. (vc-git-stash-apply (format "stash@%s" (vc-git-stash-get-at-point (point))))) (vc-dir-refresh)) (defun vc-git-stash-pop-at-point () + "Pop the stash at point." (interactive) (let (vc-dir-buffers) ; Likewise. (vc-git-stash-pop (format "stash@%s" (vc-git-stash-get-at-point (point))))) |