Contract
svn: r12499
This commit is contained in:
parent
cfb1805e44
commit
cb68faa140
|
@ -13,7 +13,7 @@
|
||||||
(define launch-browser? #t)
|
(define launch-browser? #t)
|
||||||
|
|
||||||
(provide/contract
|
(provide/contract
|
||||||
[static-files-path ((or/c string? path?) . -> . void?)])
|
[static-files-path (path-string? . -> . void?)])
|
||||||
(define (static-files-path path)
|
(define (static-files-path path)
|
||||||
(set! extra-files-path
|
(set! extra-files-path
|
||||||
(if (path? path)
|
(if (path? path)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user