if ($_ =~ /^#?LoadPlugin/i) {
# Extract param and value
my ($load,$value)=split(/=/,$_,2);
- my $active=0;
# Remove comments not at beginning of line
- if ($load !~ /#.*LoadPlugin/i) { $active=1; }
$param =~ s/^\s+//; $param =~ s/\s+$//;
$value =~ s/#.*$//;
$value =~ s/^[\s\'\"]+//g; $value =~ s/[\s\'\"]+$//g;
if (! $pluginlinefound{$value1}) { # To avoid plugin to be shown twice
$pluginlinefound{$value1}=1;
push @pconfparam, $value1;
- push @pconfactive, $active;
push @pconfvaluep, $value2;
+ my $active=0;
+ if ($load !~ /#.*LoadPlugin/i) { $active=1; }
+ push @pconfactive, $active;
}
}
}
if ($_ =~ /^#?LoadPlugin/i) {
# Extract param and value
my ($load,$value)=split(/=/,$_,2);
- my $active=0;
# Remove comments not at beginning of line
- if ($load !~ /#.*LoadPlugin/i) { $active=1; }
$param =~ s/^\s+//; $param =~ s/\s+$//;
$value =~ s/#.*$//;
$value =~ s/^[\s\'\"]+//g; $value =~ s/[\s\'\"]+$//g;
if ($value1 =~ /^graph3d$/i) { next; }
if (! $pluginlinefound{$value1}) { # To avoid plugin to be shown twice
push @pconfparam, $value1;
- push @pconfactive, $active;
push @pconfvaluep, $value2;
+ # Plugin in sample but not in config file is by default not enabled.
+ my $active=0;
+ push @pconfactive, $active;
}
}
}