Serve raw uncompressed logs directly

This commit is contained in:
Eelco Dolstra 2013-08-30 18:11:03 +00:00
parent fd7e37ef89
commit 6655ada236
2 changed files with 14 additions and 11 deletions

View file

@ -145,7 +145,6 @@ sub showLog {
my ($c, $mode, $drvPath, @outPaths) = @_;
my $logPath = findLog($c, $drvPath, @outPaths);
print STDERR "log = $logPath\n";
notFound($c, "The build log of derivation $drvPath is not available.") unless defined $logPath;
@ -159,9 +158,13 @@ sub showLog {
}
elsif ($mode eq "raw") {
if ($logPath !~ /.bz2$/) {
$c->serve_static_file($logPath);
} else {
$c->stash->{'plain'} = { data => (scalar logContents($logPath)) || " " };
$c->forward('Hydra::View::Plain');
}
}
elsif ($mode eq "tail-reload") {
my $url = $c->request->uri->as_string;