From: terry%netscape.com <>
Date: Tue, 10 Nov 1998 07:19:37 +0000 (+0000)
Subject: Patch by Sam Ziegler <ziegler@mediaguaranty.com> -- cope with product
X-Git-Tag: bugzilla-2.2~60
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=1cf02cc7c177a691ae9980f928ae30efb84a8c99;p=thirdparty%2Fbugzilla.git

Patch by Sam Ziegler <ziegler@mediaguaranty.com> -- cope with product
names that have a "/" in them.
---

diff --git a/collectstats.pl b/collectstats.pl
index a40de3cf70..05e6204cb3 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 612a2576f8..7456c054ed 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)