diff options
Diffstat (limited to 'lisp/vc/vc-dir.el')
-rw-r--r-- | lisp/vc/vc-dir.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el index 0c293526eda..033cb27e33e 100644 --- a/lisp/vc/vc-dir.el +++ b/lisp/vc/vc-dir.el @@ -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)) |