diff options
Diffstat (limited to 'drakwizard.pl')
| -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}) { |