[Collab-qa-commits] r802 - svnbuildstat/trunk/script

[goneri at alioth.debian.org]

Author: goneri
Date: 2008-04-19 19:05:03 +0000 (Sat, 19 Apr 2008)
New Revision: 802

Modified:
   svnbuildstat/trunk/script/svnbuildstat_agent.pl
Log:
only upload .deb and .udeb files

Modified: svnbuildstat/trunk/script/svnbuildstat_agent.pl
===================================================================
--- svnbuildstat/trunk/script/svnbuildstat_agent.pl	2008-04-19 00:21:34 UTC (rev 801)
+++ svnbuildstat/trunk/script/svnbuildstat_agent.pl	2008-04-19 19:05:03 UTC (rev 802)
@@ -256,7 +256,8 @@
     $report->{build} = "ok";
     $report->{files} = '';
     foreach (bsd_glob($threadbuildarea.'/*')) {
-      $report->{binarypackages} = $report->{binarypackages}.basename($_).' ';
+      next unless /deb$/; # deb & udeb
+      $report->{packages} = $report->{packages}.basename($_).' ';
       postFile($_);
     }
   } else {
@@ -335,7 +336,6 @@
 
 # Check the running jobs (See #453710)
   foreach my $pid (keys %job) {
-    print "ckeck $pid, still ".int(keys %job)." running process\n";
     waitpid($pid, WNOHANG);
     if (! -d "/proc/".$pid) {
       print "$pid is finish\n";