have xCATWorld print out error messages

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1475 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
mellor 2008-05-22 11:42:51 +00:00
parent db19c72268
commit 0b3582d2cd

View File

@ -134,6 +134,11 @@ sub handle_response
# Handle {node} structure
if ($rsp->{errorcode})
{
if ($rsp->{error}) {
foreach my $etext (@{$rsp->{error}}) {
print ($etext."\n");
}
}
foreach my $ecode (@{$rsp->{errorcode}})
{
$exitcode |= $ecode;