From 374ed228cb5fd74ff3a63e5faa26d25961f79240 Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@mandriva.org>
Date: Mon, 13 Sep 2004 06:45:41 +0000
Subject: http supplementary media were borked

---
 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 5d4feaf65..6f766338b 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -482,7 +482,7 @@ sub selectSupplMedia {
 		$url =~ m!^ftp://(?:(.*?)(?::(.*?))?@)?([^/]+)/(.*)!
 		    and $global_ftp_prefix = [ $3, $4, $1, $2 ]; #- for getFile
 	    } else {
-		my $url = $o->ask_from_entry('', N("URL of the mirror?")) or return '';
+		$url = $o->ask_from_entry('', N("URL of the mirror?")) or return '';
 	    }
 	    useMedium($medium_name);
 	    require "$suppl_method.pm"; #- require http or ftp
-- 
cgit v1.2.1