procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Don't have vc-git-stash-list bug out on the .git directory

Browse source 
* lisp/vc/vc-git.el (vc-git-stash-list): Don't bug out when
running on the .git directory itself (bug#39285).
This commit is contained in:
Dmitry Gutov 2020-09-20 12:12:36 +02:00 • committed by Lars Ingebrigtsen
parent db6bdef2dd
commit 23c20c3968
1 changed files with 7 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lisp/vc/vc-git.el
View file

@ -1707,12 +1707,13 @@ This command shares argument histories with \\[rgrep] and \\[grep]."
(vc-resynch-buffer (vc-git-root default-directory) t t))
(defun vc-git-stash-list ()
(delete
""
(split-string
(replace-regexp-in-string
"^stash@" " " (vc-git--run-command-string nil "stash" "list"))
"\n")))
(when-let ((out (vc-git--run-command-string nil "stash" "list")))
(delete
""
(split-string
(replace-regexp-in-string
"^stash@" " " out)
"\n"))))
(defun vc-git-stash-get-at-point (point)
(save-excursion