More plt-scheme -> racket-lang, specifically for planet and bugs urls.

original commit: d0ecc73df51faf23b0fd17714f535ea46f2717a3
This commit is contained in:
Eli Barzilay 2010-05-31 15:11:27 -04:00
commit fe08f34ae5
3 changed files with 5 additions and 3 deletions

View File

@ -226,7 +226,9 @@
(case-lambda (case-lambda
[(doc s) [(doc s)
(if doc (if doc
(list (module-path-prefix->string doc) s) (if (list? s)
(cons (module-path-prefix->string doc) s)
(list (module-path-prefix->string doc) s))
s)] s)]
[(doc prefix s) [(doc prefix s)
(doc-prefix doc (if prefix (doc-prefix doc (if prefix

View File

@ -655,7 +655,7 @@
style-extra-files)) style-extra-files))
,(scribble-js-contents script-file (lookup-path script-file alt-paths))) ,(scribble-js-contents script-file (lookup-path script-file alt-paths)))
(body ([id ,(or (extract-part-body-id d ri) (body ([id ,(or (extract-part-body-id d ri)
"scribble-plt-scheme-org")]) "scribble-racket-lang-org")])
,@(render-toc-view d ri) ,@(render-toc-view d ri)
(div ([class "maincolumn"]) (div ([class "maincolumn"])
(div ([class "main"]) (div ([class "main"])

View File

@ -7,4 +7,4 @@
(define url:drracket "http://racket-lang.org/") (define url:drracket "http://racket-lang.org/")
(define url:download-drracket "http://racket-lang.org/") (define url:download-drracket "http://racket-lang.org/")
(define url:planet "http://planet.plt-scheme.org/") (define url:planet "http://planet.racket-lang.org/")