added sinfo for no newlines
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1557 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
6112f5b8b3
commit
298842626a
@ -711,6 +711,13 @@ sub handle_response {
|
||||
else { print ($rsp->{info}."\n"); }
|
||||
}
|
||||
|
||||
if ($rsp->{sinfo}) {
|
||||
if (ref($rsp->{sinfo}) eq 'ARRAY') { foreach my $text (@{$rsp->{sinfo}}) { print "$text\r"; $|++; } }
|
||||
else { print ($rsp->{sinfo}."\r"); $|++; }
|
||||
}
|
||||
|
||||
|
||||
|
||||
# Handle {node} structure
|
||||
my $errflg=0;
|
||||
if (scalar @{$rsp->{node}}) {
|
||||
|
Loading…
Reference in New Issue
Block a user