Probably fixing a problem reported by Eli that I don't know how to recreate
This commit is contained in:
parent
f4c4b79049
commit
c2e81d4aa0
|
@ -209,7 +209,7 @@
|
|||
(if (and (directory-exists? "racket") (not *btgz?*))
|
||||
(filtered-map
|
||||
(lambda (x) ; only directories contain stuff we need
|
||||
(and (directory-exists? x) (get-tree x)))
|
||||
(and (directory-exists? x) (get-tree x "racket")))
|
||||
(dir-list))
|
||||
(let ([trees (filtered-map
|
||||
(lambda (x)
|
||||
|
|
Loading…
Reference in New Issue
Block a user