improvements due to 3482239

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@11453 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2012-02-02 12:28:03 +00:00
parent b7d7357ada
commit 8f9ae079d2

View File

@ -125,8 +125,12 @@ sub preprocess_request
# need for runcmd output
$::CALLBACK = $cb;
# don't want preprocess to run on service node but _xcatdest is not set??
#if ($req->{_xcatdest}) { return [$req]; } #exit if preprocessed
#if already preprocessed, go straight to request
if ( (defined($req->{_xcatpreprocessed}))
&& ($req->{_xcatpreprocessed}->[0] == 1))
{
return [$req];
}
my $nodes = $req->{node}; # this may not be the list of nodes we need!
my $service = "xcat";
@ -10393,8 +10397,8 @@ sub mkdsklsnode
$error++;
}
my $scmd = "exportfs -a";
my $output = xCAT::Utils->runcmd("$scmd", -1);
$scmd = "exportfs -a";
$output = xCAT::Utils->runcmd("$scmd", -1);
if ($::RUNCMD_RC != 0)
{
my $rsp;
@ -13057,7 +13061,7 @@ sub update_spot_rpm
my $rsp;
push @{$rsp->{data}}, "The following RPM packages were already installed and were not reinstalled:\n";
xCAT::MsgUtils->message("W", $rsp, $callback);
my $rsp;
$rsp={};
foreach my $rpm (@dontinstall) {
push @{$rsp->{data}}, "$rpm";
}