fix(plugin) avoid unwanted perl error in some case
This commit is contained in:
parent
0a73134d8e
commit
7bb2771618
|
@ -324,9 +324,11 @@ sub manage_selection {
|
|||
$config_data->{formatting}->{printf_metric_value},
|
||||
max(@{$self->{vmetrics}->{$vcurve}->{values}})) if ($config_data->{virtualcurve}->{$vcurve}->{aggregation} eq 'max');
|
||||
|
||||
if ($config_data->{virtualcurve}->{$vcurve}->{aggregation} eq 'none') {
|
||||
$self->{vmetrics}->{$vcurve}->{aggregated_value} = ($config_data->{virtualcurve}->{$vcurve}->{aggregation} eq 'none' && defined($config_data->{virtualcurve}->{$vcurve}->{custom})) ?
|
||||
eval "$config_data->{virtualcurve}->{$vcurve}->{custom}" :
|
||||
eval "$self->{vmetrics}->{$vcurve}->{aggregated_value} $config_data->{virtualcurve}->{$vcurve}->{custom}";
|
||||
}
|
||||
|
||||
$self->{vmetrics}->{$vcurve}->{unit} = (defined($config_data->{virtualcurve}->{$vcurve}->{unit})) ? $config_data->{virtualcurve}->{$vcurve}->{unit} : '';
|
||||
$self->{vmetrics}->{$vcurve}->{min} = (defined($config_data->{virtualcurve}->{$vcurve}->{min})) ? $config_data->{virtualcurve}->{$vcurve}->{min} : '';
|
||||
|
|
Loading…
Reference in New Issue