fix search path problem in scribble

original commit: 0a0445692b5727e6cb0661035ada7f4da21d861d
This commit is contained in:
Robby Findler 2011-05-13 09:05:04 -05:00
parent 45f4c0c133
commit 36e76ed714
2 changed files with 2 additions and 2 deletions

View File

@ -12,7 +12,7 @@
(cons new properties)))
(define (scribble-file s)
(path->main-collects-relative (build-path (collection-path "scribble") s)))
(path->main-collects-relative (collection-file-path s "scribble")))
(define (add-defaults doc pfx styl extras version?)
(struct-copy part doc [style (make-style (style-name (part-style doc))

View File

@ -10,6 +10,6 @@
(define-on-demand scheme-properties
(let ([abs (lambda (s)
(path->main-collects-relative (build-path (collection-path "scribble") s)))])
(path->main-collects-relative (collection-file-path s "scribble")))])
(list (make-css-addition (abs "racket.css"))
(make-tex-addition (abs "racket.tex")))))