From a3895ced497ab87e1b7deb77a73f99b6c09e91fd Mon Sep 17 00:00:00 2001
From: Bart Van Assche <bvanassche@acm.org>
Date: Sun, 19 Jun 2011 06:22:10 +0000
Subject: [PATCH] scstadmin(sysfs): Make writing top-level non-key attributes
 work. Do not indent these attributes.

git-svn-id: http://svn.code.sf.net/p/scst/svn/branches/2.0.0.x@3595 d57e44dd-8a1f-0410-8b47-8ef2f437770f
---
 scstadmin/scstadmin.sysfs/scstadmin | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/scstadmin/scstadmin.sysfs/scstadmin b/scstadmin/scstadmin.sysfs/scstadmin
index 44137717e..290693aef 100755
--- a/scstadmin/scstadmin.sysfs/scstadmin
+++ b/scstadmin/scstadmin.sysfs/scstadmin
@@ -1002,10 +1002,10 @@ sub writeConfiguration {
 
 		if (!$$attributes{$attribute}->{'static'}) {
 			if (defined($$attributes{$attribute}->{'keys'})) {
-				foreach my $key (@{$$attributes{$attribute}->{'keys'}}) {
+				foreach my $key (%{$$attributes{$attribute}->{'keys'}}) {
 					my $value = $$attributes{$attribute}->{'keys'}->{$key}->{'value'};
 					$value = "\"$value\"" if ($value =~ / /);
-					print $io "\t$attribute $value\n"
+					print $io "$attribute $value\n"
 					  if (defined($value) && ($value ne ''));
 				}
 			} elsif ($nonkey) {