diff -up BackPAN-Index-0.40/t/lib/TestUtils.pm.orig BackPAN-Index-0.40/t/lib/TestUtils.pm
--- BackPAN-Index-0.40/t/lib/TestUtils.pm.orig 2011-03-01 01:59:30.000000000 +0100
+++ BackPAN-Index-0.40/t/lib/TestUtils.pm 2011-03-20 10:50:09.000000000 +0100
@@ -39,7 +39,7 @@ sub backpan_index_url {
# Init a new BackPAN::Index object with the right options for testing
sub new_backpan {
my %args = @_;
- $args{backpan_index_url} = backpan_index_url() if $args{update};
+ $args{backpan_index_url} = backpan_index_url();
return BackPAN::Index->new({
cache_dir => cache_dir(),
@@ -50,7 +50,7 @@ sub new_backpan {
sub new_pbp {
my %args = @_;
- $args{backpan_index_url} = backpan_index_url() if $args{update};
+ $args{backpan_index_url} = backpan_index_url();
require Parse::BACKPAN::Packages;
return Parse::BACKPAN::Packages->new({