Changeset 24744

Timestamp:

Jul 10, 2009, 9:56:03 PM (17 years ago)

Author:

bills

Message:

Don't try to add every fileset ever made in one go.
Set limit to 100 for now

File:

• trunk/ippScripts/scripts/receive_source.pl (modified) (2 diffs)

trunk/ippScripts/scripts/receive_source.pl

@@ -64 +64 @@
 my @filesets = ();              # Filesets to add
 my @lines = split(/\n/, join "", @$stdout_buf); # Lines from output
+my $numFilesets = 0;
 foreach my $line ( @lines ) {
     $line =~ s/\#.*//g;
@@ -71 +72 @@
     my $fileset = $fields[1];
     push @filesets, $fileset if defined $fileset and $fileset =~ /\S+/;
+
+    # TODO don't overload recevietool.  Tune this limit
+    $numFilesets++;
+    last if $numFilesets >= 100;
 }