diff options
author | Florent Villard <warly@mandriva.com> | 2003-08-22 21:29:12 +0000 |
---|---|---|
committer | Florent Villard <warly@mandriva.com> | 2003-08-22 21:29:12 +0000 |
commit | de6e60435383dbebc186933d54b1b9bc68aba118 (patch) | |
tree | 0f8111bf3792d88d39d64fde0793e20dd7305607 /drakwizard.pl | |
parent | 150bc87396011253a541ca0ad32250e926ab0ecc (diff) | |
download | drakwizard-de6e60435383dbebc186933d54b1b9bc68aba118.tar drakwizard-de6e60435383dbebc186933d54b1b9bc68aba118.tar.gz drakwizard-de6e60435383dbebc186933d54b1b9bc68aba118.tar.bz2 drakwizard-de6e60435383dbebc186933d54b1b9bc68aba118.tar.xz drakwizard-de6e60435383dbebc186933d54b1b9bc68aba118.zip |
fix the IFCFG reset of PATH env var which breaks packages installation
Diffstat (limited to 'drakwizard.pl')
-rwxr-xr-x | drakwizard.pl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/drakwizard.pl b/drakwizard.pl index 7e184f29..192f1e41 100755 --- a/drakwizard.pl +++ b/drakwizard.pl @@ -20,7 +20,6 @@ use lib qw(/usr/lib/libDrakX); use strict; -our ($Wizard_title, $Wizard_pix_up, $lib_script, $perl_module, %variable, $in, $rpm, %chooser_hash, $welcome, $perl_module_name, $verbose, %description, $summary, $summary_func, %disabled, $current_page, %bool); use standalone; use interactive; @@ -29,13 +28,14 @@ use common; #- I18N. push @::textdomains, 'drakwizard'; -$::DEBUG = 1; +$::DEBUG = 0; $::isWizard = 1; $::Wizard_no_previous = 1; $::Wizard_title = "Drakwizard"; $::Wiz_dir = '__WIZ_HOME__'; -my $in = 'interactive'->vnew('/bin/su', 'default'); +my $in = interactive->vnew; my $standalone = 1; + my %wiz = ( apache => ['Apache', "Apache web server"], @@ -63,7 +63,7 @@ if (!defined($wiz{$ARGV[0]})) { require "MDK/Wizard/$wiz{$ARGV[0]}[0].pm"; -my ($wiz, $err) = $wiz{$ARGV[0]}[0]->new($wiz{$ARGV[0]}[2]); +my ($wiz, $err) = "MDK::Wizard::$wiz{$ARGV[0]}[0]"->new($wiz{$ARGV[0]}[2]); if ($err) { $::Wizard_finished = 1; $in->ask_okcancel("error", N($err)); |