pkg/lib: fix pkg-directory->additional-installs

Merge to v6.1 (with a70b3173b2)
This commit is contained in:
Matthew Flatt 2014-07-15 10:39:53 +01:00
parent a3af35754d
commit add04001cd

View File

@ -3258,7 +3258,7 @@
(set-union
omits
(for/set ([i (in-list (append omit-paths omit-files))])
(simplify-path (path->complete-path i f)))))
(simplify-path (build-path f i)))))
(for/fold ([s new-s]) ([f (directory-list f #:build? #t)])
(loop s f #f new-omits))])]
[else s])))