diff options
| -rw-r--r-- | perl-install/proxy.pm | 12 |
1 files changed, 12 insertions, 0 deletions
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"); +} |