Mercurial > urweb
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 =