From: <mga...@us...> - 2010-09-22 17:30:58
|
Revision: 2159 http://scst.svn.sourceforge.net/scst/?rev=2159&view=rev Author: mgandalf Date: 2010-09-22 17:30:52 +0000 (Wed, 22 Sep 2010) Log Message: ----------- - Fix attributes with no values. Modified Paths: -------------- trunk/scstadmin/scstadmin.sysfs/scstadmin Modified: trunk/scstadmin/scstadmin.sysfs/scstadmin =================================================================== --- trunk/scstadmin/scstadmin.sysfs/scstadmin 2010-09-22 17:28:10 UTC (rev 2158) +++ trunk/scstadmin/scstadmin.sysfs/scstadmin 2010-09-22 17:30:52 UTC (rev 2159) @@ -4184,10 +4184,11 @@ 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}}) { This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |