structure Autodoc :> AUTODOC_CONFIG = struct
val htmlHeader = fn title =>
- String.concat ["<html><head><title>",
+ String.concat ["<div class=\"main\">\n<div class=\"title\">\n<img class=\"globe\" src=\"/globe.gif\" />\n<h1>",
title,
- "</title><body><h1>",
- title,
- "</h1>\n"]
+ "</h1>\n</div>"]
+
+val htmlFooter = "</div>"
-val htmlFooter = "</body></html>"
+val stylesheet = "/hcoop.css"
end