From 0d8f2ff918a2a72afca411fb3fd0f779e95e8405 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 12 Aug 2002 19:40:09 +0000 Subject: use setExportedVarsInSh for setting /etc/profile.d/proxy.sh so that http_proxy and ftp_proxy are exported (thanks to Pascal ) --- perl-install/any.pm | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'perl-install/any.pm') diff --git a/perl-install/any.pm b/perl-install/any.pm index 2ff0cef2c..b796f25f3 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -606,13 +606,12 @@ DockIntoPanel=0 pppdTimeout=30 END } - miscellaneousNetwork($prefix); + miscellaneousNetwork(); } sub miscellaneousNetwork { - my ($prefix) = @_; - setVarsInSh ("$prefix/etc/profile.d/proxy.sh", $::o->{miscellaneous}, qw(http_proxy ftp_proxy)); - setVarsInCsh("$prefix/etc/profile.d/proxy.csh", $::o->{miscellaneous}, qw(http_proxy ftp_proxy)); + setExportedVarsInSh ("$::prefix/etc/profile.d/proxy.sh", $::o->{miscellaneous}, qw(http_proxy ftp_proxy)); + setExportedVarsInCsh("$::prefix/etc/profile.d/proxy.csh", $::o->{miscellaneous}, qw(http_proxy ftp_proxy)); } sub load_category_no_message { -- cgit v1.2.1