ovh-api

diff --git a/bin/ovh-api b/bin/ovh-api
index 142e85a5a46edd942c1027e02f089852a82b6b89..3a685b2794f509e87498f199c0447f767eff78ca 100755 (executable)
--- a/bin/ovh-api
+++ b/bin/ovh-api
@@ -80,8 +80,8 @@ $BODY = -e $BODY ? JSON::decode_json(`cat $BODY`) : JSON::encode_json($BODY) if
 #use Data::Dumper; die Dumper($BODY);
 my $response = $o->rawCall(path=>$URL,method=>$Opt{method},body=>$BODY);
 
-if (!$response) {
-  die "$NAME: $URL failed!"
+if ($response->isFailure()) {
+  die "$NAME: ".$response->error()."\n";
 }
 
 my $content = $response->content;