diff options
Diffstat (limited to 'perl-install/standalone/drakproxy')
-rwxr-xr-x | perl-install/standalone/drakproxy | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/perl-install/standalone/drakproxy b/perl-install/standalone/drakproxy index f09d86199..0b50f23d2 100755 --- a/perl-install/standalone/drakproxy +++ b/perl-install/standalone/drakproxy @@ -25,9 +25,8 @@ use interactive; use network::network; use any; -$::o->{miscellaneous} ||= {}; -$::o->{miscellaneous} = { getVarsFromSh('/etc/profile.d/proxy.sh') }; +my $u = { getVarsFromSh('/etc/profile.d/proxy.sh') }; my $in = 'interactive'->vnew('su', 'network'); -network::network::miscellaneousNetwork($in, 1, 1); -any::miscellaneousNetwork(''); +network::network::miscellaneous_choose($in, $u, 1, 1); +network::network::proxy_configure($u); $in->exit(0); |