--- trunk/run.pl	2009/05/18 18:51:40	1184
+++ trunk/run.pl	2009/05/19 11:55:30	1185
@@ -22,7 +22,7 @@
 use Data::Dump qw/dump/;
 use Storable qw/dclone/;
 use Pod::Usage qw/pod2usage/;
-use LWP::Simple;
+use LWP::Simple qw//;
 
 use POSIX ":sys_wait_h"; # imports WNOHANG
 
@@ -417,8 +417,8 @@
 			$base =~ s{/[^/]+$}{};
 			mkpath $base unless -e $base;
 
-			my $rc = mirror( "$mirror/$path", $path );
-			if (is_error( $rc )) {
+			my $rc = LWP::Simple::mirror( "$mirror/$path", $path );
+			if (LWP::Simple::is_error( $rc )) {
 				die "can't mirror $mirror/$path -> $path [$rc]";
 			} else {
 				$log->info( "mirror ", $path, " [$rc] ", -s $path, " bytes" );