From a54bde4c99c9fe27267edf7755543a40ec614a10 Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Tue, 6 Sep 2005 12:28:41 +0000 Subject: Remove a misleading comment --- perl-install/install_any.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/install_any.pm') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 8646d4ac4..72b84d3aa 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -512,7 +512,7 @@ sub selectSupplMedia { } else { my $url; local $global_ftp_prefix; - if ($suppl_method eq 'ftp') { #- mirrors are ftp only (currently) + if ($suppl_method eq 'ftp') { $url = $o->askSupplMirror(N("URL of the mirror?")) or return 'error'; $url =~ m!^ftp://(?:(.*?)(?::(.*?))?\@)?([^/]+)/(.*)! and $global_ftp_prefix = [ $3, $4, $1, $2 ]; #- for getFile -- cgit v1.2.1