Use "main.rkt" instead of "main.ss" in constructed path
This commit is contained in:
parent
4279fe3c4f
commit
41ea7311f3
|
@ -78,7 +78,7 @@
|
||||||
(let ([s (cadr p)])
|
(let ([s (cadr p)])
|
||||||
(if (regexp-match? #rx"[./]" s)
|
(if (regexp-match? #rx"[./]" s)
|
||||||
s
|
s
|
||||||
(string-append s "/main.ss"))))]
|
(string-append s "/main.rkt"))))]
|
||||||
[dir (if (and (null? (cddr p))
|
[dir (if (and (null? (cddr p))
|
||||||
(null? (cdr strs)))
|
(null? (cdr strs)))
|
||||||
(collection-path "mzlib")
|
(collection-path "mzlib")
|
||||||
|
|
Loading…
Reference in New Issue
Block a user