SVN: toys/rsget.pl/RSGet/Plugin.pm
sparky
sparky at pld-linux.org
Thu Oct 29 04:10:34 CET 2009
Author: sparky
Date: Thu Oct 29 04:10:33 2009
New Revision: 10878
Modified:
toys/rsget.pl/RSGet/Plugin.pm
Log:
- don't overwrite uris when loading file second time
Modified: toys/rsget.pl/RSGet/Plugin.pm
==============================================================================
--- toys/rsget.pl/RSGet/Plugin.pm (original)
+++ toys/rsget.pl/RSGet/Plugin.pm Thu Oct 29 04:10:33 2009
@@ -147,7 +147,7 @@
}
}
- $self->{uri} = \@out;
+ $self->{urire} = \@out;
}
sub new
@@ -169,7 +169,7 @@
$error .= $self->check_parts( $parts );
$self->eval_uris();
- return undef unless @{ $self->{uri} };
+ return undef unless @{ $self->{urire} };
$self->{error} = "$self->{pkg} plugin error: $error" if $error;
p $file . ": " . $self->{error} if $error;
@@ -206,7 +206,7 @@
my $self = shift;
my $uri = shift;
- foreach my $re ( @{ $self->{uri} } ) {
+ foreach my $re ( @{ $self->{urire} } ) {
return 1 if $uri =~ m{^http://(?:www\.)?$re};
}
return 0;
More information about the pld-cvs-commit
mailing list