diff options
Diffstat (limited to 'perl-install/crypto.pm')
| -rw-r--r-- | perl-install/crypto.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/crypto.pm b/perl-install/crypto.pm index 2951c001c..c824af475 100644 --- a/perl-install/crypto.pm +++ b/perl-install/crypto.pm @@ -36,8 +36,8 @@ sub getFile($$) { my ($file, $host) = @_; log::l("getting crypto file $file on directory $host:$mirrors{$host}[1]/$::VERSION with login $mirrors{$host}[2]"); my ($ftp, $retr) = ftp::new($_[1], "$mirrors{$host}[1]/$::VERSION", - ($mirrors{$host}[2] ? ($mirrors{$host}[2]) : ()), - ($mirrors{$host}[3] ? ($mirrors{$host}[3]) : ()) + $mirrors{$host}[2] ? $mirrors{$host}[2] : (), + $mirrors{$host}[3] ? $mirrors{$host}[3] : () ); $$retr->close if $$retr; $$retr = $ftp->retr($file) or ftp::rewindGetFile(); |