From 4cece7d7fc7b2735e7920dbbd7f5e8f1d2a03f93 Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Mon, 11 Jun 2001 16:17:21 +0000
Subject: updated

---
 perl-install/proxy.pm | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

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

diff --git a/perl-install/proxy.pm b/perl-install/proxy.pm
index 04d5c0f68..f19ed4d82 100644
--- a/perl-install/proxy.pm
+++ b/perl-install/proxy.pm
@@ -1,12 +1,20 @@
 package proxy;
 
+use diagnostics;
+use strict;
+use run_program;
+use common qw(:common :system :file);
+use log;
+use c;
+
 sub main {
     my ($prefix, $in, $install) = @_;
   begin:
     $::Wizard_no_previous = 1;
     $in->ask_okcancel(_("Proxy configuration"), _("blabla proxy"), 1) or quit_global($in, 0);
-    my $url = $in->ask_from_entry($url, _("foo"), _("url"));
-    print STDERR $url, "\n";
+    my $url;
+    my $e = $in->ask_from_entry($url, _("foo"), _("url"));
+    print "$url / $e \n";
     undef $::Wizard_no_previous;
     log::l("[drakproxy] Installation complete, exiting\n");
 }
-- 
cgit v1.2.1