bkyk8rc3zvpnsf5inmcqq4n3k98cv6hj-my-site-hyper-literate-git.test.suzanne.soy-0.0.1

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README | LICENSE
commit 40d4f61785977072402518855e1ce620edd5946b
parent 465d9a6e9d5e603077879843b08fc551c3843f24
Author: Matthew Flatt <mflatt@racket-lang.org>
Date:   Fri,  7 Dec 2007 20:46:12 +0000

add DOCTYPE for Scribble-generated HTML

svn: r7924

original commit: 40910d252cecba73603aa4f73ca0cbfba8f34a53

Diffstat:

Mcollects/scribble/html-render.ss | 1+


1 file changed, 1 insertion(+), 0 deletions(-)

diff --git a/collects/scribble/html-render.ss b/collects/scribble/html-render.ss
@@ -283,6 +283,7 @@
                                   (div ((class "maincolumn")) 
                                        (div ((class "main")) ,@(render-part d ri)))))])
             (install-file scribble-css)
+            (printf "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\" \"http://www.w3.org/TR/html4/loose.dtd\">\n")
             (xml:write-xml/content (xml:xexpr->xml xpr)))))
 
       (define/override (render-one d ri fn)