X-Git-Url: https://git.hcoop.net/hcoop/zz_old/portal.git/blobdiff_plain/a41f82505ce6f2b3fa87d293f1a08b8a5ae90554..646dca750aa736367166cdb9d9175dddd9779297:/static/gen.sml diff --git a/static/gen.sml b/static/gen.sml index 6bb6e8b..272e785 100644 --- a/static/gen.sml +++ b/static/gen.sml @@ -10,11 +10,11 @@ end structure NM = BinaryMapFn(IntKey) -val outputDir = "/var/www/home/html/dyn/" +val outputDir = "/var/www/dyn/" fun generate () = let - val db = C.conn "dbname='hcoop'" + val db = C.conn "dbname='hcoop_hcoop'" fun header (outf, title) = (TextIO.output (outf, "\n"); @@ -313,4 +313,4 @@ fun main _ = (generate ()) List.app (fn s => print (s ^ "\n")) (SMLofNJ.exnHistory ex); OS.Process.failure) -end \ No newline at end of file +end