SVN: toys/fun/rsget.pl

[sparky]

Author: sparky
Date: Thu Mar  5 21:45:22 2009
New Revision: 10173

Modified:
   toys/fun/rsget.pl
Log:
- RS: handle "server overload" message also in stage3


Modified: toys/fun/rsget.pl
==============================================================================
--- toys/fun/rsget.pl	(original)
+++ toys/fun/rsget.pl	Thu Mar  5 21:45:22 2009
@@ -560,6 +560,8 @@
 		$body =~ /Instant download access! Or try again in about ([0-9]+) minutes\./m;
 		my $m = $1;
 		return $self->wait( $m * 60 + 10, \&stage1, "free limit reached, waiting" );
+	} elsif ( $body =~ /Unfortunately you will have to wait ([0-9]+) minutes,/m ) {
+		return $self->wait( $1 * 60, \&stage1, "servers overloaded, waiting" );
 	}
 	unless ( $body =~ /var c=([0-9]+);/m ) {
 		return $self->problem( "var c=", $body );