1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-08 04:30:45 -08:00

lisp/vc/vc-git.el (vc-git-stash): Respect vc-dir marked files

This commit is contained in:
Sam Steingold 2018-09-28 10:51:05 -04:00
parent 06e2814e1f
commit 2d54710c36

View file

@ -1480,7 +1480,7 @@ This command shares argument histories with \\[rgrep] and \\[grep]."
(interactive "sStash name: ")
(let ((root (vc-git-root default-directory)))
(when root
(vc-git--call nil "stash" "save" name)
(apply #'vc-git--call nil "stash" "push" "-m" name (vc-dir-marked-files))
(vc-resynch-buffer root t t))))
(defvar vc-git-stash-read-history nil