diff options
author | terry%netscape.com <> | 1998-11-10 08:19:37 +0100 |
---|---|---|
committer | terry%netscape.com <> | 1998-11-10 08:19:37 +0100 |
commit | 1cf02cc7c177a691ae9980f928ae30efb84a8c99 (patch) | |
tree | 235232c5fcc2e5d1fb13ad91e8b44da262c2a3f3 | |
parent | d123c1dccda06bd3a89fbc0633921ba183384734 (diff) | |
download | bugzilla-1cf02cc7c177a691ae9980f928ae30efb84a8c99.tar.gz bugzilla-1cf02cc7c177a691ae9980f928ae30efb84a8c99.tar.xz |
Patch by Sam Ziegler <ziegler@mediaguaranty.com> -- cope with product
names that have a "/" in them.
-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) |