From 1cf02cc7c177a691ae9980f928ae30efb84a8c99 Mon Sep 17 00:00:00 2001
From: "terry%netscape.com" <>
Date: Tue, 10 Nov 1998 07:19:37 +0000
Subject: Patch by Sam Ziegler <ziegler@mediaguaranty.com> -- cope with product
 names that have a "/" in them.

---
 collectstats.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'collectstats.pl')

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;
 
-- 
cgit v1.2.3-24-g4f1b