SVN: toys/rsget.pl/rsget.pl

[sparky]

Author: sparky
Date: Thu Aug 13 00:48:24 2009
New Revision: 10478

Modified:
   toys/rsget.pl/rsget.pl
Log:
- TU: detect missing files


Modified: toys/rsget.pl/rsget.pl
==============================================================================
--- toys/rsget.pl/rsget.pl	(original)
+++ toys/rsget.pl/rsget.pl	Thu Aug 13 00:48:24 2009
@@ -1651,6 +1651,9 @@
 	$self->print("starting......");
 	$self->{referer} = $url;
 
+	if ( $body =~ /File Not Found/ ) {
+		return $self->error( "file not found" );
+	}
 	my @body = split /\n+/, $body;
 	do {
 		return $self->error( "no form" ) unless @body;