diff options
| -rwxr-xr-x | config-db/slxconfig | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/config-db/slxconfig b/config-db/slxconfig index f63224a9..3a293e09 100755 --- a/config-db/slxconfig +++ b/config-db/slxconfig @@ -225,14 +225,16 @@ sub parseKeyValueArgsWithAttrs } my $key = lc($1); my $value = $2; - if ($value eq '-') { - $value = undef; - } # replace escaped newlines and tab chars by the respective real thing $value =~ s{\\n}{\n}gms; $value =~ s{\\t}{\t}gms; + # accept '-' as placeholder for undefined + if ($value eq '-') { + $value = undef; + } + if (grep { $_ eq $key } @$allowedKeys) { $dataHash{$key} = $value; } elsif (grep { $_ eq $key } @$allowedAttrKeys) { |