From fb52e5b25ac9f810410a75ccfe534526e9cbce95 Mon Sep 17 00:00:00 2001
From: jjhua <jjhua@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Fri, 15 Jul 2011 02:09:41 +0000
Subject: [PATCH]  lshwconn is splitting the output incorrectly, because the
 state= information contains commas. fixed it

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@10093 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/FSPconn.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-xCAT/xCAT/FSPconn.pm b/perl-xCAT/xCAT/FSPconn.pm
index 4d257cc85..1bb6cb2e3 100644
--- a/perl-xCAT/xCAT/FSPconn.pm
+++ b/perl-xCAT/xCAT/FSPconn.pm
@@ -612,7 +612,7 @@ sub lshwconn
            my @data_a = split("\n", $values);         
            foreach my $data(@data_a) {
 	           if( $data =~ /state/) { 
-	               $data =~ /state=([\w\s]+), type=([\w-]+), MTMS=([\w-\*]+), ([\w=]+), slot=([\w]+), ipadd=([\w.]+), alt_ipadd=([\w.]+)/ ;
+	               $data =~ /state=([\w\s\,]+), type=([\w-]+), MTMS=([\w-\*]+), ([\w=]+), slot=([\w]+), ipadd=([\w.]+), alt_ipadd=([\w.]+)/ ;
 	               #$data =~ /state=([\w\s]+),\(type=([\w-]+)\),\(serial-number=([\w]+)\),\(machinetype-model=([\w-]+)\),sp=([\w]+),\(ip-address=([\w.]+),([\w.]+)\)/ ;
 	               print "parsing: $1,$2,$3,$4,$5,$6,$7\n";
 	               my $state      = $1;