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;
_______________________________________________
pld-cvs-commit mailing list
pld-cvs-commit@lists.pld-linux.org
http://lists.pld-linux.org/mailman/listinfo/pld-cvs-commit
