fixed bug 3109407, use if(@TableRowArray) to replace if(defined(@TableRowArray))
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8167 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
		| @@ -84,7 +84,7 @@ sub do_getmacs { | ||||
|         my $table = "nodetype"; | ||||
|         my $intable = 0; | ||||
|         my @TableRowArray = xCAT::DBobjUtils->getDBtable($table); | ||||
|         if ( defined(@TableRowArray) ) { | ||||
|         if ( @TableRowArray ) { | ||||
|             foreach ( @TableRowArray ) { | ||||
|                 my @nodelist = split(',', $_->{'node'}); | ||||
|                 my @oslist = split(',', $_->{'os'}); | ||||
|   | ||||
| @@ -758,7 +758,7 @@ sub lpar_netboot { | ||||
|         my $table = "nodetype"; | ||||
|         my $intable = 0; | ||||
|         my @TableRowArray = xCAT::DBobjUtils->getDBtable($table); | ||||
|         if ( defined(@TableRowArray) ) { | ||||
|         if ( @TableRowArray ) { | ||||
|             foreach ( @TableRowArray ) { | ||||
|                 my @nodelist = split(',', $_->{'node'}); | ||||
|                 my @oslist = split(',', $_->{'os'}); | ||||
|   | ||||
| @@ -297,7 +297,7 @@ sub do_getmacs { | ||||
|         my $table = "nodetype"; | ||||
|         my $intable = 0; | ||||
|         my @TableRowArray = xCAT::DBobjUtils->getDBtable($table); | ||||
|         if ( defined(@TableRowArray) ) { | ||||
|         if ( @TableRowArray ) { | ||||
|             foreach ( @TableRowArray ) { | ||||
|                 my @nodelist = split(',', $_->{'node'}); | ||||
|                 my @oslist = split(',', $_->{'os'}); | ||||
|   | ||||
		Reference in New Issue
	
	Block a user