Update of /cvsroot/fink/fink/perlmod/Fink
In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv6873/perlmod/Fink

Modified Files:
        ChangeLog NetAccess.pm 
Log Message:
enable lftpget as a download option (falls back to curl if package uses 
SourceRename)

Index: NetAccess.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/NetAccess.pm,v
retrieving revision 1.59
retrieving revision 1.60
diff -u -d -r1.59 -r1.60
--- NetAccess.pm        1 Mar 2007 16:29:03 -0000       1.59
+++ NetAccess.pm        4 Apr 2007 19:30:22 -0000       1.60
@@ -420,9 +420,21 @@
                }
                # Axel always continues downloads, by default
        }
-       
+
+       # lftpget doesn't let us rename a file as we download, so we skip 
unless $file eq &filename($url)
+       if ((!$cmd or $config->param_default("DownloadMethod") eq "lftpget") and
+                       (-x "$basepath/bin/lftpget" or -x "/usr/bin/lftpget") 
and ($file eq &filename($url))) {
+               $cmd = "lftpget";
+               if ($config->verbosity_level() >= 1) {
+                       $cmd .= " -v";
+               }
+               if ($cont) {
+                       $cmd .= " -c";
+               }
+       }
+
        if (!$cmd) {
-               die "Can't locate a download program. Install either curl, 
wget, or axel.\n";
+               die "Can't locate a download program. Install either curl, 
wget, axel, or lftpget.\n";
        }
 
        return $cmd;

Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v
retrieving revision 1.1446
retrieving revision 1.1447
diff -u -d -r1.1446 -r1.1447
--- ChangeLog   22 Mar 2007 04:16:48 -0000      1.1446
+++ ChangeLog   4 Apr 2007 19:30:21 -0000       1.1447
@@ -1,3 +1,7 @@
+2007-04-04  Benjamin Reed  <[EMAIL PROTECTED]
+
+       * NetAccess.pm: Use lftpget if available and appropriate
+
 2007-03-22  Daniel Macks  <[EMAIL PROTECTED]>
 
        * Package.pm: Use prompt_selection for menu of choices


-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys-and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Fink-commits mailing list
Fink-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/fink-commits

Reply via email to