Make curl follow redirects

Message-ID: <20050821071625.GA29394@windhund.schwern.org>

p4raw-id: //depot/perl@25317

diff --git a/lib/CPAN.pm b/lib/CPAN.pm
index 095b533..fa83398 100644 (file)
--- a/lib/CPAN.pm
+++ b/lib/CPAN.pm
@@ -2651,8 +2651,10 @@ sub hosthard {
            $src_switch = " -source";
          } elsif ($f eq "ncftp"){
            $src_switch = " -c";
-          } elsif ($f eq "wget"){
-            $src_switch = " -O -";
+         } elsif ($f eq "wget"){
+           $src_switch = " -O -";
+         } elsif ($f eq 'curl'){
+           $src_switch = ' -L';
          }
 
          my($chdir) = "";