sub handler {
my $r = shift;
my $dbh = Sesse::pr0n::Common::get_dbh();
+
+ # We ignore the body, but we _must_ consume it fully before
+ # we output anything, or Squid will get seriously confused
+ $r->discard_request_body;
$r->headers_out->{'DAV'} = "1,2";
</propstat>
</response>
EOF
- $r->log->info("Full list");
}
$r->print("</multistatus>\n");
# Make cache while we're at it.
# Don't do it for the resource forks Mac OS X loves to upload :-(
if ($filename !~ /^\._/) {
- Sesse::pr0n::Common::ensure_cached($r, $filename, $newid, -1, -1, 1, 80, 64, 320, 256);
+ Sesse::pr0n::Common::ensure_cached($r, $filename, $newid, -1, -1, 1, 80, 64, 320, 256, -1, -1);
}
# OK, we got this far, commit