summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorArnaud Desmons <adesmons@mandriva.com>2002-08-26 10:57:35 +0000
committerArnaud Desmons <adesmons@mandriva.com>2002-08-26 10:57:35 +0000
commit84a8d1757e7bb25c375ae5398a653a928f2b0371 (patch)
tree3d64df75c248ef3d570bf2047e0da15151904ab8
parent81adda61c911154f2ed92724f07336011e207844 (diff)
downloaddrakwizard-84a8d1757e7bb25c375ae5398a653a928f2b0371.tar
drakwizard-84a8d1757e7bb25c375ae5398a653a928f2b0371.tar.gz
drakwizard-84a8d1757e7bb25c375ae5398a653a928f2b0371.tar.bz2
drakwizard-84a8d1757e7bb25c375ae5398a653a928f2b0371.tar.xz
drakwizard-84a8d1757e7bb25c375ae5398a653a928f2b0371.zip
missed sourcing libScript
-rwxr-xr-xdrakwizard.pl7
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}) {