update with use of _xcatpreprocessed

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@3786 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2009-07-15 14:36:56 +00:00
parent 677047fe75
commit 5a3cd7d7f6

View File

@ -419,10 +419,9 @@ sub preprocess_request
@ARGV = @{$req->{arg}};
GetOptions('l' => \$localonly);
}
if ($req->{_xcatdest})
{
return [$req];
} #Exit if the packet has been preprocessed in its history
#Exit if the packet has been preprocessed
if ($req->{_xcatpreprocessed}->[0] == 1) { return [$req]; }
my @requests =
({%$req}); #Start with a straight copy to reflect local instance
unless ($localonly) {
@ -431,6 +430,7 @@ sub preprocess_request
{
my $reqcopy = {%$req};
$reqcopy->{'_xcatdest'} = $s;
$reqcopy->{_xcatpreprocessed}->[0] = 1;
push @requests, $reqcopy;
}
}