diff options
author | Arnaud Desmons <adesmons@mandriva.com> | 2002-08-26 10:57:35 +0000 |
---|---|---|
committer | Arnaud Desmons <adesmons@mandriva.com> | 2002-08-26 10:57:35 +0000 |
commit | 84a8d1757e7bb25c375ae5398a653a928f2b0371 (patch) | |
tree | 3d64df75c248ef3d570bf2047e0da15151904ab8 | |
parent | 81adda61c911154f2ed92724f07336011e207844 (diff) | |
download | drakwizard-84a8d1757e7bb25c375ae5398a653a928f2b0371.tar drakwizard-84a8d1757e7bb25c375ae5398a653a928f2b0371.tar.gz drakwizard-84a8d1757e7bb25c375ae5398a653a928f2b0371.tar.bz2 drakwizard-84a8d1757e7bb25c375ae5398a653a928f2b0371.tar.xz drakwizard-84a8d1757e7bb25c375ae5398a653a928f2b0371.zip |
missed sourcing libScript
-rwxr-xr-x | drakwizard.pl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/drakwizard.pl b/drakwizard.pl index cb0cfbd5..4d001e22 100755 --- a/drakwizard.pl +++ b/drakwizard.pl @@ -62,6 +62,11 @@ if (!defined($ARGV[0])) { ); $ARGV[0] = $wiz{$ARGV[0]}[0]; } + +if ("@ARGV" =~ /--debug/) { + no warnings; +} + my $o = []; $xmltree = XML::Parser->new(Style => 'Tree')->parsefile($ARGV[0]); @@ -202,7 +207,7 @@ sub display { } } if ($_->{main_order} eq 'entry' and $_->{fillScript}) { - $ENV{$variable{$_->{variableName}}} = `$_->{fillScript}`; + $ENV{$variable{$_->{variableName}}} = `. $lib_script && $_->{fillScript}`; chomp($ENV{$variable{$_->{variableName}}}); } elsif (!$ENV{$variable{$_->{variableName}}} && $_->{main_order} eq 'entry' && $_->{fillfunc}) { |