suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix `raco setup' for a collection that disappears

Browse Source
This commit is contained in:
Matthew Flatt 2011-09-20 13:22:27 -06:00
parent 36e53c56cb
commit f21187248a
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/setup/setup-unit.rkt
View File

@ -866,7 +866,8 @@
(simplify-path (apply build-path p (for/list ([i (cddr c)]) 'up)) #f)
;; relative path => no root needed for checking omits:
#f)])
(not (eq? 'all (omitted-paths dir getinfo omit-root))))
(and (directory-exists? dir)
(not (eq? 'all (omitted-paths dir getinfo omit-root)))))
(or (file-exists? (build-path dir "info.rkt"))
(file-exists? (build-path dir "info.ss"))))
(hash-set! t a (list b c d e))