From de6e60435383dbebc186933d54b1b9bc68aba118 Mon Sep 17 00:00:00 2001 From: Florent Villard Date: Fri, 22 Aug 2003 21:29:12 +0000 Subject: fix the IFCFG reset of PATH env var which breaks packages installation --- common/IFCFG.pm | 5 ++--- common/Varspaceval.pm | 5 ++--- common/Wizcommon.pm | 4 ++-- 3 files changed, 6 insertions(+), 8 deletions(-) (limited to 'common') diff --git a/common/IFCFG.pm b/common/IFCFG.pm index e86128d1..0d0c96b2 100644 --- a/common/IFCFG.pm +++ b/common/IFCFG.pm @@ -18,7 +18,7 @@ # along with this program; if not, write to the Free Software # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. -package IFCFG; +package MDK::Wizard::IFCFG; use strict; use lib qw(/usr/lib/libDrakX); use Data::Dumper; @@ -27,10 +27,9 @@ use network::network; #my $file = "/etc/sysconfig/network-scripts/drakconnect_conf"; #!-f $file and die "no such $file"; -sub new { +sub new { my $self = {}; - $ENV{PATH} = ""; my $ifconfig = `LC_ALL=C /sbin/ifconfig -a`; my $device = 'NONE'; my @interfaces; diff --git a/common/Varspaceval.pm b/common/Varspaceval.pm index 61a31cff..fd5500d1 100644 --- a/common/Varspaceval.pm +++ b/common/Varspaceval.pm @@ -1,16 +1,15 @@ #!/usr/bin/perl -w # Author Philippe Hétroy, phetroy@mandrakesoft.com -# $Id: Varspaceval.pm,v 1.1 2003-08-22 19:59:47 warly Exp $ +# $Id: Varspaceval.pm,v 1.2 2003-08-22 21:29:12 warly Exp $ # Module for loding and committing informations in a VAR = value file type -package Varspaceval; +package MDK::Wizard::Varspaceval; use lib('./'); use strict; use Data::Dumper; - # Get all useful content of the config file # Return a hash containg the key and the value # ATTENTION : in the conf file, an empty value is returnes as a spaced value (mandatory because of XML compatibility) diff --git a/common/Wizcommon.pm b/common/Wizcommon.pm index 847f41f9..6ade7ec8 100644 --- a/common/Wizcommon.pm +++ b/common/Wizcommon.pm @@ -18,7 +18,7 @@ # along with this program; if not, write to the Free Software # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. -package Wizcommon; +package MDK::Wizard::Wizcommon; use strict; use MDK::Wizard::IFCFG; @@ -30,7 +30,7 @@ sub check_dhcp { sub new { my ($class, $conf) = @_; - $net = new IFCFG; + $net = new MDK::Wizard::IFCFG; bless { net => $net, }, $class; -- cgit v1.2.1