diff --git a/collects/scribble/base.rkt b/collects/scribble/base.rkt index 75b61be4..292d9840 100644 --- a/collects/scribble/base.rkt +++ b/collects/scribble/base.rkt @@ -226,7 +226,9 @@ (case-lambda [(doc s) (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)] [(doc prefix s) (doc-prefix doc (if prefix diff --git a/collects/scribble/html-render.rkt b/collects/scribble/html-render.rkt index 40f2220d..2e7eac9f 100644 --- a/collects/scribble/html-render.rkt +++ b/collects/scribble/html-render.rkt @@ -655,7 +655,7 @@ style-extra-files)) ,(scribble-js-contents script-file (lookup-path script-file alt-paths))) (body ([id ,(or (extract-part-body-id d ri) - "scribble-plt-scheme-org")]) + "scribble-racket-lang-org")]) ,@(render-toc-view d ri) (div ([class "maincolumn"]) (div ([class "main"]) diff --git a/collects/scribble/urls.rkt b/collects/scribble/urls.rkt index c4604c25..d51e1e37 100644 --- a/collects/scribble/urls.rkt +++ b/collects/scribble/urls.rkt @@ -7,4 +7,4 @@ (define url: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/")