martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Make sure not to mark directories

Browse Source 
* lisp/vc/vc-dir.el (vc-dir-mark-all-files):
Make sure not to mark directories (bug#37182).
This commit is contained in:
Wolfgang Scherer
2020-02-12 00:24:24 +02:00
committed by Dmitry Gutov
parent ff4ed4a0ff
commit 2b12c2b6f2
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/vc/vc-dir.el
View File

@@ -649,7 +649,7 @@ line."
(defun vc-dir-mark-all-files (arg)
"Mark all files with the same state as the current one.
With a prefix argument mark all files.
With a prefix argument mark all files (not directories).
If the current entry is a directory, mark all child files.
The commands operate on files that are on the same state.
@@ -670,7 +670,8 @@ share the same state."
vc-ewoc)
(ewoc-map
(lambda (filearg)
(unless (vc-dir-fileinfo->marked filearg)
(unless (or (vc-dir-fileinfo->directory filearg)
(vc-dir-fileinfo->marked filearg))
(setf (vc-dir-fileinfo->marked filearg) t)
t))
vc-ewoc))