xCAT/xcat-core
2
0
Fork 0
mirror of https://github.com/xcat2/xcat-core.git synced 2025-05-30 09:36:41 +00:00
Code Issues Releases Wiki Activity

fix missing data from xdsh return

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4264 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2009-09-30 16:11:56 +00:00
parent 46b15e161b
commit 44c1d6401d
1 changed files with 13 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
perl-xCAT/xCAT/SINV.pm
View File

@ -23,6 +23,7 @@ use xCAT::NodeRange qw/noderange abbreviate_noderange/;
use xCAT::Utils;
use Fcntl qw(:flock);
use Getopt::Long;
use Data::Dumper;
my $tempfile;
my $errored = 0;
my @dshresult;
@ -1325,6 +1326,15 @@ sub xdshoutput
push(@cmdresult, $line);
}
}
if ($rsp->{data})
{
foreach (@{$rsp->{data}})
{
my $line = $_;
$line .= "\n";
push(@cmdresult, $line);
}
}
return $rc;
@ -1342,7 +1352,8 @@ sub xdshoutput
sub rinvoutput
{
my $rsp = shift;
#print "I am here \n";
#print Dumper($rsp);
# Handle node structure, like rinv returns
my $errflg = 0;
@ -1480,7 +1491,7 @@ sub storeresults
close(XCOLL);
close FILE;
#system("/bin/rm $newtempfile");
system("/bin/rm $newtempfile");
# capture errors
#