my $qsp = PublicInbox::Qspawn->new($cmd);
my @cl = ('Content-Length', $size);
my $env = $ctx->{env};
- $env->{'qspawn.response'} = delete $ctx->{-wcb};
+ $env->{'qspawn.wcb'} = delete $ctx->{-wcb};
$qsp->psgi_return($env, undef, sub {
my ($r, $bref) = @_;
if (!defined $r) { # error
my $raw_link = "(<a\nhref=$path>raw</a>)";
if ($size > $max_size) {
return stream_large_blob($ctx, $res, \$log, $fn) if defined $fn;
- # TODO: stream the raw file if it's gigantic, at least
$log = "<pre><b>Too big to show, download available</b>\n" .
"$oid $type $size bytes $raw_link</pre>" . $log;
return html_page($ctx, 500, \$log);
}
my $binary = index($$blob, "\0") >= 0;
- if ($fn) {
+ if (defined $fn) {
my $h = [ 'Content-Length', $size, 'Content-Type' ];
push(@$h, ($binary ? 'application/octet-stream' : 'text/plain'));
return delete($ctx->{-wcb})->([200, $h, [ $$blob ]]);