From 1a996ceb744f490f0183099640e7a1eb3ad039c1 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 22 Aug 2000 01:10:13 +0000
Subject: no_comment

---
 perl-install/ftp.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/ftp.pm')

diff --git a/perl-install/ftp.pm b/perl-install/ftp.pm
index 36b99b560..6bbd6cbae 100644
--- a/perl-install/ftp.pm
+++ b/perl-install/ftp.pm
@@ -54,8 +54,8 @@ sub getFile {
     my $f = shift;
     my ($ftp, $retr) = new(@_ ? @_ : fromEnv);
     $$retr->close if $$retr;
-    $$retr   = $ftp->retr(install_any::relGetFile($f)) or rewindGetFile();
-    $$retr ||= $ftp->retr(install_any::relGetFile($f));
+    $$retr   = $ftp->retr($f) or rewindGetFile();
+    $$retr ||= $ftp->retr($f);
 }
 
 #-sub closeFiles() {
-- 
cgit v1.2.1