Commit 863e5e99 authored by Leigh B Stoller's avatar Leigh B Stoller

Some fixes to deal with responses from AM, which look different then

ProtoGeni's CM.
parent 597f0a26
......@@ -254,10 +254,17 @@ sub CallMethod($$$@)
elsif ($goo->value()->is_fault()
|| (ref($goo->value()) && UNIVERSAL::isa($goo->value(),"HASH")
&& exists($goo->value()->{'faultCode'}))) {
$code = GENIRESPONSE_RPCERROR();
$code = $goo->value()->{"faultCode"}->value;
$value = $goo->value()->{"faultCode"}->value;
$output = $goo->value()->{"faultString"}->value;
}
elsif (! (ref($goo->value()) && UNIVERSAL::isa($goo->value(),"HASH")
&& exists($goo->value()->{'code'}))) {
# Sadly, the AM interface returns a different structure.
$code = GENIRESPONSE_SUCCESS();
$value = $goo->value()->value;
$output = undef;
}
else {
$code = $goo->value()->{'code'}->value;
$value = $goo->value()->{'value'}->value;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment