svn: r9884
This commit is contained in:
parent
935ce0c9e3
commit
9933ce7312
|
@ -80,8 +80,7 @@
|
||||||
(provide module-path-prefix->string)
|
(provide module-path-prefix->string)
|
||||||
|
|
||||||
(define (module-path-prefix->string p)
|
(define (module-path-prefix->string p)
|
||||||
(format "~a" (path->main-collects-relative
|
(format "~a" (path->main-collects-relative (resolve-module-path p #f))))
|
||||||
(resolve-module-path p #f))))
|
|
||||||
|
|
||||||
;; ----------------------------------------
|
;; ----------------------------------------
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user