diff src/settings.sml @ 858:346cf1908a17

Avoid using prepared statements for non-persistent protocols
author Adam Chlipala <adamc@hcoop.net>
date Sat, 27 Jun 2009 10:50:45 -0400
parents 3d2f6cb6d54a
children 60240acd15b9
line wrap: on
line diff
--- a/src/settings.sml	Sat Jun 27 10:30:51 2009 -0400
+++ b/src/settings.sml	Sat Jun 27 10:50:45 2009 -0400
@@ -252,7 +252,7 @@
 type protocol = {
      name : string,
      link : string,
-     supportsPush : bool
+     persistent : bool
 }
 val protocols = ref ([] : protocol list)
 fun addProtocol p = protocols := p :: !protocols
@@ -263,12 +263,9 @@
 
 val http = {name = "http",
             link = clibFile "request.o" ^ " " ^ clibFile "http.o",
-            supportsPush = true}
+            persistent = true}
 
 val () = addProtocol http
-val () = addProtocol {name = "cgi",
-                      link = clibFile "request.o" ^ " " ^ clibFile "cgi.o",
-                      supportsPush = false}
 
 val curProto = ref http
 fun setProtocol name =