uncomment use strict and fix incorrect variable

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.7@13620 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2012-08-27 18:26:22 +00:00
parent b7e4a65913
commit c7dcb9160c

View File

@ -24,7 +24,7 @@ use File::Basename;
use xCAT::GlobalDef;
use xCAT_monitoring::monitorctrl;
use Socket;
#use strict;
use strict;
my $CALLBACK;
my $RERUNPS4SECURITY;
1;
@ -543,7 +543,7 @@ sub preprocess_updatenode
foreach my $snkey (keys %$sn)
{
my @tmp_a=split(',',$s);
my @tmp_a=split(',',$snkey);
foreach my $s1 (@tmp_a) {
if ($::SECURITY
&& !(grep /^$s1$/, @good_sns)