val patch_xsl : string -> string
val patch_dtd : string -> string
-val return_html_error: string -> out_channel -> unit
-val return_html_internal_error: string -> out_channel -> unit
- (** return an HTML HTTP response from the given string, embedding it in an
- "H1" element of an HTML page; content-type is set to text/html *)
-val return_html_msg: string -> out_channel -> unit
- (** return an HTTP response using given string as content; content-type is set
- to text/html *)
-val return_html_raw: string -> out_channel -> unit
- (** return an HTTP response using given string as content; content-type is set
- to text/xml *)
-val return_xml_raw: string -> out_channel -> unit
- (** return a bad request http response *)
-val return_400: string -> out_channel -> unit
(**
@param fname name of the file to be sent
@param contype Content-Type header value