svn: r9884
original commit: 9933ce7312a17ecbb866f60432b6974b3ce38cc0
This commit is contained in:
parent
1453e39789
commit
50ce3b1a9a
|
@ -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