arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fix perl syntax error in xcatpreprocessed check

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4148 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2009-09-16 17:58:41 +00:00
parent 4c8c4ff701
commit e01d6ba039
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
xCAT-server/lib/xcat/plugins/nodestat.pm
View File

@ -77,12 +77,15 @@ sub preprocess_request
my $req = shift;
my $cb = shift;
my %sn;
if ($req->{_xcatpreprocessed}->[0] == 1) { return [$req]; }
if ((defined($req->{_xcatpreprocessed})) &&
($req->{_xcatpreprocessed}->[0] == 1)) {
return [$req];
}
my $nodes = $req->{node};
my $service = "xcat";
my @requests;
if ($nodes){
return [$req]; #For now, do not distribute, nodestat seems to lose accuracy and slow down distributed
return [$req]; #For now, do not distribute, nodestat seems to lose accuracy and slow down distributed
# find service nodes for requested nodes
# build an individual request for each service node
my $sn = xCAT::Utils->get_ServiceNode($nodes, $service, "MN");