summaryrefslogtreecommitdiffstats
path: root/perl-install/proxy.pm
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-06-12 22:45:51 +0000
committerdamien <damien@mandriva.com>2001-06-12 22:45:51 +0000
commitcc529231413f4ab54f20e60f7e1c08b42c250d46 (patch)
tree8fa4d2cba2a27f47a9507f87f7215410ac88fd31 /perl-install/proxy.pm
parent9d98348b82e5c1416a63caa74a9f0593e4798be3 (diff)
downloaddrakx-cc529231413f4ab54f20e60f7e1c08b42c250d46.tar
drakx-cc529231413f4ab54f20e60f7e1c08b42c250d46.tar.gz
drakx-cc529231413f4ab54f20e60f7e1c08b42c250d46.tar.bz2
drakx-cc529231413f4ab54f20e60f7e1c08b42c250d46.tar.xz
drakx-cc529231413f4ab54f20e60f7e1c08b42c250d46.zip
typo
Diffstat (limited to 'perl-install/proxy.pm')
-rw-r--r--perl-install/proxy.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/proxy.pm b/perl-install/proxy.pm
index 163d67f26..652388a83 100644
--- a/perl-install/proxy.pm
+++ b/perl-install/proxy.pm
@@ -11,7 +11,7 @@ use c;
sub main {
my ($prefix, $in, $install) = @_;
my $proxy_cfg = {};
- my $config_file; = "$prefix/usr/lib/wgetrc";
+ my $config_file = "$prefix/usr/lib/wgetrc";
# grab current config
foreach (cat_($config_file)) {
@@ -31,6 +31,7 @@ sub main {
# http proxy
step_http_proxy:
undef $::Wizard_no_previous;
+ $proxy_cfg->{http_url} ||= "http:";
$in->ask_from_entries_refH(_("Proxy configuration"),
_("Please fill in the http proxy informations"),
[ { label => _("URL"), val => \$proxy_cfg->{http_url} },