vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-06 06:22:25 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix success colour and width of build status report.

Browse source
This commit is contained in:
David Brown 2016-07-20 12:25:41 +01:00
parent 4bbfe120c7
commit 92e892c450
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/tools/make/buildall.pl
View file

@ -157,7 +157,7 @@ sub colourfor {
my ($str) = @_; my ($str) = @_;
if ($str eq "Failed") {return "#e03030";} if ($str eq "Failed") {return "#e03030";}
if ($str eq "Changed") {return "#d0a030";} if ($str eq "Changed") {return "#d0a030";}
return #60ff60; return "#60ff60";
} }
my $rows = keys %status; my $rows = keys %status;
@ -166,7 +166,7 @@ my $width = 710;
my $height = ($rows+2.2) * $lineheight; my $height = ($rows+2.2) * $lineheight;
open(my $svg, ">build-status.svg") // die "Could not create build-status.svg."; open(my $svg, ">build-status.svg") // die "Could not create build-status.svg.";
print $svg '<svg width="680" height="', $height, '"'; print $svg '<svg width="', $width, '" height="', $height, '"';
print $svg ' xmlns="http://www.w3.org/2000/svg" version="1.1"'; print $svg ' xmlns="http://www.w3.org/2000/svg" version="1.1"';
print $svg ' xmlns:xlink="http://www.w3.org/1999/xlink"', ">\n"; print $svg ' xmlns:xlink="http://www.w3.org/1999/xlink"', ">\n";
print $svg '<rect x="3" y="3" width="', $width-6, '" height="', $height-6, '"'; print $svg '<rect x="3" y="3" width="', $width-6, '" height="', $height-6, '"';