update with use of _xcatpreprocessed

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@3796 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2009-07-15 15:35:05 +00:00
parent e2b1a4e4e3
commit d97e54f897

View File

@ -77,7 +77,8 @@ sub preprocess_request
my $req = shift;
my $cb = shift;
my %sn;
if ($req->{_xcatdest}) { return [$req]; } #exit if preprocessed
if ($req->{_xcatpreprocessed}->[0] == 1) { return [$req]; }
#exit if preprocessed
my $nodes = $req->{node}; # this may not be the list of nodes we need!
my $command = $req->{command}->[0];
$::args = $req->{arg};
@ -108,6 +109,7 @@ sub preprocess_request
my $reqcopy = {%$req};
$reqcopy->{node} = $sn->{$snkey};
$reqcopy->{'_xcatdest'} = $snkey;
$reqcopy->{_xcatpreprocessed}->[0] = 1;
push @requests, $reqcopy;
}