diff options
| -rwxr-xr-x | collectstats.pl | 3 | ||||
| -rwxr-xr-x | reports.cgi | 6 |
2 files changed, 7 insertions, 2 deletions
diff --git a/collectstats.pl b/collectstats.pl index a40de3cf7..05e6204cb 100755 --- a/collectstats.pl +++ b/collectstats.pl @@ -34,6 +34,7 @@ GetVersionTable(); foreach (@::legal_product) { my $dir = "data/mining"; + &check_data_dir ($dir); &collect_stats ($dir, $_); } @@ -60,7 +61,7 @@ select count(bug_status) from bugs where (bug_status='NEW' or bug_status='ASSIGNED' or bug_status='REOPENED') and product='$product' group by bug_status FIN - + $product =~ s/\//-/gs; my $file = join '/', $dir, $product; my $exists = -f $file; diff --git a/reports.cgi b/reports.cgi index 612a2576f..7456c054e 100755 --- a/reports.cgi +++ b/reports.cgi @@ -409,7 +409,11 @@ FIN my @dates; my @open; my @assigned; my @reopened; - my $file = join '/', $dir, $::FORM{'product'}; + my $prodname = $::FORM{'product'}; + + $prodname =~ s/\//-/gs; + + my $file = join '/', $dir, $prodname; my $image = "$file.gif"; if (! open FILE, $file) |