status-report-scripts parseBZbugList,1.48,1.49

[Christian Iseli (c4chris)]

Author: c4chris

Update of /cvs/fedora/status-report-scripts
In directory cvs-int.fedora.redhat.com:/tmp/cvs-serv18184

Modified Files:
	parseBZbugList 
Log Message:
Filter missing comps.xml packages using owners.list.


Index: parseBZbugList
===================================================================
RCS file: /cvs/fedora/status-report-scripts/parseBZbugList,v
retrieving revision 1.48
retrieving revision 1.49
diff -u -r1.48 -r1.49
--- parseBZbugList	9 Aug 2006 22:51:56 -0000	1.48
+++ parseBZbugList	15 Aug 2006 23:23:58 -0000	1.49
@@ -698,7 +698,8 @@
     $owner =~ s/\@/ at /;
     $owner =~ s/\./ dot /g;
     foreach my $p (sort @$e) {
-      print "||$owner||`$p`||\n";
+      my $oa = $OWN{$p};
+      print "||$owner||`$p`||$$oa[2]||\n";
     }
   }
 }
@@ -1419,6 +1420,10 @@
     next if $k =~ /^(lib|compat-|xfce4-|gtk-|kmod-|fonts?-)/i;
     next if $k =~ /(-devel|lib[s0-9]*|-python|-perl|-servers?|-clients?|-tools?)$/i;
     next if $k =~ /(-contribs?|-docs?|-x?emacs|-utils?|-fonts?)$/i;
+    my $oa = $OWN{$k};
+    if (defined $oa) {
+      next if $$oa[2] =~ /(binding|library|module|utilit)/i;
+    }
     $mh->{$k} = -1;
   }
   foreach my $k (keys %$ch) {