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

fix info-domain updating to recognize "info.ss" in addition to "info.rkt"

Browse Source 
which solves the problem of forgetting a Planet-based tool when a
 new Planet-based tool is installed (if the old tool used "info.ss"
 instead of "info.rkt")
This commit is contained in:
Matthew Flatt 2010-07-09 10:23:02 -06:00
parent 20bb4a8dfa
commit cdf67d884f
1 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -723,12 +723,11 @@
(and (if (cc-root-dir cc)
(relative-path? p)
(complete-path? p))
(file-exists?
(build-path
(if (cc-root-dir cc)
(let ([dir (if (cc-root-dir cc)
(build-path (cc-root-dir cc) p)
p)
"info.rkt"))))))
p)])
(or (file-exists? (build-path dir "info.rkt"))
(file-exists? (build-path dir "info.ss"))))))))
a)
(list (? symbol? b) ...)
c