-let return_xml_msg = mk_return_fun pp_msg "text/xml"
- (**
- @param fname name of the file to be sent
- @param contype Content-Type header value
- @param contenc Content-Enconding header value
- @param patch_fun function used to patch file contents
- @param outchan output channel over which sent file fname *)