omit DS_Store

pull/247/head
Matthew Butterick 4 years ago
parent 29b05dbddb
commit bd23f651fb

@ -293,7 +293,7 @@
(define+provide (special-path? path) (define+provide (special-path? path)
(define special-paths (append default-cache-names '("compiled" ".git" ".gitignore" ".hg" ".svn" "CVS" "Makefile"))) (define special-paths (append default-cache-names '("compiled" ".git" ".gitignore" ".hg" ".svn" "CVS" "Makefile" ".DS_Store")))
(and (member (path->string (last (explode-path path))) special-paths) #t)) (and (member (path->string (last (explode-path path))) special-paths) #t))
(module-test-internal (module-test-internal

@ -1 +1 @@
1606103241 1612329461

Loading…
Cancel
Save