SVN: toys/rsget.pl/RSGet/Curl.pm

[sparky]

Author: sparky
Date: Sat Dec 12 00:19:56 2009
New Revision: 11031

Modified:
   toys/rsget.pl/RSGet/Curl.pm
Log:
- catch "bind failed with errno" error and remove failed interface


Modified: toys/rsget.pl/RSGet/Curl.pm
==============================================================================
--- toys/rsget.pl/RSGet/Curl.pm	(original)
+++ toys/rsget.pl/RSGet/Curl.pm	Sat Dec 12 00:19:56 2009
@@ -391,8 +391,8 @@
 	if ( $err ) {
 		#warn "error($err): $error\n";
 		$get_obj->print( "ERROR($err): $error" ) if $err ne "aborted";
-		if ( $error =~ /Couldn't bind to '(.*)'/ ) {
-			my $if = $1;
+		if ( $error =~ /Couldn't bind to '(.*)'/ or $error =~ /bind failed/ ) {
+			my $if = $get_obj->{_outif};
 			RSGet::Dispatch::remove_interface( $if, "Interface $if is dead" );
 			$get_obj->{_abort} = "Interface $if is dead";
 		} elsif ( $error =~ /transfer closed with (\d+) bytes remaining to read/ ) {