From 749c8a3e75a910520a5eae3baa82b24ba232875c Mon Sep 17 00:00:00 2001 From: Bart Van Assche Date: Fri, 11 Dec 2015 18:34:39 +0000 Subject: [PATCH] scstadmin: Fix -attributes behavior for multiple attributes git-svn-id: http://svn.code.sf.net/p/scst/svn/trunk@6734 d57e44dd-8a1f-0410-8b47-8ef2f437770f --- scstadmin/scstadmin.sysfs/scst-0.9.10/lib/SCST/SCST.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/scstadmin/scstadmin.sysfs/scst-0.9.10/lib/SCST/SCST.pm b/scstadmin/scstadmin.sysfs/scst-0.9.10/lib/SCST/SCST.pm index 2eb5055e2..e5c8a2d55 100644 --- a/scstadmin/scstadmin.sysfs/scst-0.9.10/lib/SCST/SCST.pm +++ b/scstadmin/scstadmin.sysfs/scst-0.9.10/lib/SCST/SCST.pm @@ -2224,7 +2224,7 @@ sub addLun { my $o_string = ""; foreach my $attribute (keys %{$attributes}) { my $value = $$attributes{$attribute}; - $o_string .= "$attribute=$value; "; + $o_string .= "$attribute=$value;"; } $o_string =~ s/\s$//; @@ -2415,7 +2415,7 @@ sub replaceLun { my $o_string = ""; foreach my $attribute (keys %{$attributes}) { my $value = $$attributes{$attribute}; - $o_string .= "$attribute=$value; "; + $o_string .= "$attribute=$value;"; } $o_string =~ s/\s$//; @@ -4135,7 +4135,7 @@ sub openDevice { my $o_string = ""; foreach my $attribute (keys %{$attributes}) { my $value = $$attributes{$attribute}; - $o_string .= "$attribute=$value; "; + $o_string .= "$attribute=$value;"; } $o_string =~ s/\s$//;