mirror of
https://github.com/SCST-project/scst.git
synced 2026-05-18 03:01:26 +00:00
- Fix for attributes without values from trunk.
git-svn-id: http://svn.code.sf.net/p/scst/svn/branches/2.0.0.x@2165 d57e44dd-8a1f-0410-8b47-8ef2f437770f
This commit is contained in:
@@ -4184,10 +4184,11 @@ sub configToAttr {
|
||||
my %attributes;
|
||||
|
||||
foreach my $attr (keys %{$config}) {
|
||||
if ((keys %{$$config{$attr}}) > 1) {
|
||||
if (!scalar keys %{$$config{$attr}}) {
|
||||
$attributes{$attr} = '';
|
||||
} elsif ((keys %{$$config{$attr}}) > 1) {
|
||||
foreach my $value (keys %{$$config{$attr}}) {
|
||||
push @{$attributes{$attr}}, $value if (defined($value) &&
|
||||
($value ne ''));
|
||||
push @{$attributes{$attr}}, $value;
|
||||
}
|
||||
} else {
|
||||
foreach my $value (keys %{$$config{$attr}}) {
|
||||
|
||||
Reference in New Issue
Block a user