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:
parent
b7e4a65913
commit
c7dcb9160c
@ -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)
|
||||
|
Loading…
x
Reference in New Issue
Block a user