diff --git a/collects/scribble/html-render.rkt b/collects/scribble/html-render.rkt index a8f099e6..4905d6e4 100644 --- a/collects/scribble/html-render.rkt +++ b/collects/scribble/html-render.rkt @@ -663,8 +663,7 @@ (lambda (in) (copy-port in (current-output-port))))) (parameterize ([xml:empty-tag-shorthand xml:html-empty-tags]) - (xml:write-xml/content - (xml:xexpr->xml + (xml:write-xexpr `(html () (head () (meta ([http-equiv "content-type"] @@ -698,7 +697,7 @@ ,@(navigation d ri #t) ,@(render-part d ri) ,@(navigation d ri #f))) - (div ([id "contextindicator"]) nbsp))))))))) + (div ([id "contextindicator"]) nbsp)))))))) (define/private (part-parent d ri) (collected-info-parent (part-collected-info d ri)))