- | Enc_normal ->
- debug_print "No format mangling required (encoding = normal)";
- return_file ~fname:basename ~contype ~patch_fun outchan
- | Enc_gzipped ->
- debug_print "No format mangling required (encoding = gzipped)";
+ | `Normal ->
+ Http_getter_logger.log ~level:2
+ "No format mangling required (encoding = normal)";
+ return_file ~via_http ~fname:basename ~contype ~patch_fun outchan
+ | `Gzipped ->
+ Http_getter_logger.log ~level:2
+ "No format mangling required (encoding = gzipped)";