From d6f47e29221b0fb0c2248d47f0cc21031d5e330b Mon Sep 17 00:00:00 2001 From: damien Date: Mon, 11 Jun 2001 15:44:18 +0000 Subject: proxy --- perl-install/proxy.pm | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100644 perl-install/proxy.pm diff --git a/perl-install/proxy.pm b/perl-install/proxy.pm new file mode 100644 index 000000000..e9d65bc80 --- /dev/null +++ b/perl-install/proxy.pm @@ -0,0 +1,12 @@ +package proxy; + +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"; + undef $::Wizard_no_previous; + log::l("[drakproxy] Installation complete, exiting\n"); +} -- cgit v1.2.1