diff options
author | Dylan William Hardison <dylan@hardison.net> | 2017-07-05 20:43:18 +0200 |
---|---|---|
committer | Dylan William Hardison <dylan@hardison.net> | 2017-07-07 00:19:20 +0200 |
commit | 37722eca39874bb6abdcd120e3e458bd62dea62b (patch) | |
tree | 57a9a9970c00ec77baecab7e154ef7dfcef863fe /reports.cgi | |
parent | a6f98de0d4e842351222b0173a1fff151da8738e (diff) | |
download | bugzilla-37722eca39874bb6abdcd120e3e458bd62dea62b.tar.gz bugzilla-37722eca39874bb6abdcd120e3e458bd62dea62b.tar.xz |
Bug 1377933 - Remove trailing whitespace from all perl files
Diffstat (limited to 'reports.cgi')
-rwxr-xr-x | reports.cgi | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/reports.cgi b/reports.cgi index e7ed5335c..1633e37ca 100755 --- a/reports.cgi +++ b/reports.cgi @@ -41,7 +41,7 @@ Bugzilla->switch_to_shadow_db(); if (!$product_name) { # Can we do bug charts? - (-d $dir && -d $graph_dir) + (-d $dir && -d $graph_dir) || ThrowCodeError('chart_dir_nonexistent', {dir => $dir, graph_dir => $graph_dir}); @@ -175,7 +175,7 @@ sub generate_chart { my $date = $line[0]; my ($yy, $mm, $dd) = $date =~ /^\d{2}(\d{2})(\d{2})(\d{2})$/; push @{$data{DATE}}, "$mm/$dd/$yy"; - + for my $i (1 .. $#fields) { my $field = $fields[$i]; if (! defined $line[$i] or $line[$i] eq '') { @@ -189,7 +189,7 @@ sub generate_chart { } } } - + shift @labels; close FILE; @@ -221,7 +221,7 @@ sub generate_chart { dataset4 => [0, 0, 0], # black }, ); - + $img->set (%settings); $img->png($image_file, [ @data{('DATE', @labels)} ]); } |