Author: sparky
Date: Wed Jul 14 18:54:35 2010
New Revision: 11672
Modified:
toys/rsget.pl/RSGet/Processor.pm
Log:
- delay for 15 minutes if download turns out to be HTML
Modified: toys/rsget.pl/RSGet/Processor.pm
==============================================================================
--- toys/rsget.pl/RSGet/Processor.pm (original)
+++ toys/rsget.pl/RSGet/Processor.pm Wed Jul 14 18:54:35 2010
@@ -35,12 +35,13 @@
return unless $is_sub;
$is_sub--;
- my $error = 'unexpected end of script';
if ( $last_cmd and $last_cmd =~ /(?:click_)?download/ ) {
- $error = 'download is a HTML page';
+ $last_cmd = undef;
+ pr "\treturn \${self}->delay( 15 * 60, 'download is a HTML
page' );\n}\n";
+ return;
}
$last_cmd = undef;
- pr "\treturn \${self}->error( '$error' );\n}\n";
+ pr "\treturn \${self}->error( 'unexpected end of script' );\n}\n";
}
my $space;
_______________________________________________
pld-cvs-commit mailing list
[email protected]
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
