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

[sparky]

Author: sparky
Date: Mon Jun 28 20:14:40 2010
New Revision: 11623

Modified:
   toys/rsget.pl/RSGet/FileList.pm
Log:
- ignore getter= option if its value is not valid; fixes RSGETPL-6


Modified: toys/rsget.pl/RSGet/FileList.pm
==============================================================================
--- toys/rsget.pl/RSGet/FileList.pm	(original)
+++ toys/rsget.pl/RSGet/FileList.pm	Mon Jun 28 20:14:40 2010
@@ -260,11 +260,11 @@
 
 		foreach my $uri ( keys %decoded ) {
 			my $opt = $decoded{ $uri };
-			if ( $opt->{getter} ) {
-				$decoded{ $uri } = [ RSGet::Plugin::from_pkg( $opt->{getter} ),
-					$opt ];
+			my $getter;
+			if ( $opt->{getter} and $getter = RSGet::Plugin::from_pkg( $opt->{getter} ) ) {
+				$decoded{ $uri } = [ $getter, $opt ];
 			} else {
-				my $getter = RSGet::Plugin::from_uri( $uri );
+				$getter = RSGet::Plugin::from_uri( $uri );
 				if ( $getter ) {
 					my $newuri = $getter->unify( $uri );
 					$opt->{getter} = $getter->{pkg};