diff -Nru zentyal-remoteservices-3.1.8/ChangeLog zentyal-remoteservices-3.1.9/ChangeLog --- zentyal-remoteservices-3.1.8/ChangeLog 2013-09-15 11:35:41.000000000 +0000 +++ zentyal-remoteservices-3.1.9/ChangeLog 2013-09-18 12:43:21.000000000 +0000 @@ -1,3 +1,6 @@ +3.1.9 + + Handle connection errors in setAdminPort + + Set to debug level several dev oriented notifications 3.1.8 + Better error if we cannot register due to lack of free space + Fix links to see latest reports or its documentation on Reports tab diff -Nru zentyal-remoteservices-3.1.8/debian/changelog zentyal-remoteservices-3.1.9/debian/changelog --- zentyal-remoteservices-3.1.8/debian/changelog 2013-09-15 11:35:41.000000000 +0000 +++ zentyal-remoteservices-3.1.9/debian/changelog 2013-09-18 12:43:21.000000000 +0000 @@ -1,3 +1,9 @@ +zentyal-remoteservices (3.1.9) precise; urgency=low + + * New upstream release + + -- José A. Calvo Wed, 18 Sep 2013 14:43:21 +0200 + zentyal-remoteservices (3.1.8) precise; urgency=low * New upstream release diff -Nru zentyal-remoteservices-3.1.8/src/EBox/RemoteServices/AdminPort.pm zentyal-remoteservices-3.1.9/src/EBox/RemoteServices/AdminPort.pm --- zentyal-remoteservices-3.1.8/src/EBox/RemoteServices/AdminPort.pm 2013-09-15 11:35:41.000000000 +0000 +++ zentyal-remoteservices-3.1.9/src/EBox/RemoteServices/AdminPort.pm 2013-09-18 12:43:21.000000000 +0000 @@ -61,11 +61,20 @@ my ($self, $port) = @_; my $uuid = $self->{cred}->{uuid}; - my $response = $self->RESTClient()->PUT("/v1/servers/$uuid/adminport/", - query => { port => $port }, - retry => 1); - return ($response->{result}->is_success()); + my $result = undef; + + try { + my $response = $self->RESTClient()->PUT("/v1/servers/$uuid/adminport/", + query => { port => $port }, + retry => 1); + $result = ($response->{result}->is_success()); + } otherwise { + my $ex = shift; + EBox::error("Failed to notify admin port to Remote: $ex"); + }; + + return $result; } 1; diff -Nru zentyal-remoteservices-3.1.8/src/EBox/RemoteServices/SOAPClient.pm zentyal-remoteservices-3.1.9/src/EBox/RemoteServices/SOAPClient.pm --- zentyal-remoteservices-3.1.8/src/EBox/RemoteServices/SOAPClient.pm 2013-09-15 11:35:41.000000000 +0000 +++ zentyal-remoteservices-3.1.9/src/EBox/RemoteServices/SOAPClient.pm 2013-09-18 12:43:21.000000000 +0000 @@ -83,8 +83,8 @@ if ( $params{proxy} =~ m/^https/ and not defined( $params{certs} )) { - EBox::warn('Doing connection to web service: ' - . "$params{name} without credentials to $params{proxy}"); + EBox::debug('Doing connection to web service: ' + . "$params{name} without credentials to $params{proxy}"); } my $soapConn = new SOAP::Lite( diff -Nru zentyal-remoteservices-3.1.8/src/scripts/notify-job zentyal-remoteservices-3.1.9/src/scripts/notify-job --- zentyal-remoteservices-3.1.8/src/scripts/notify-job 2013-09-15 11:35:41.000000000 +0000 +++ zentyal-remoteservices-3.1.9/src/scripts/notify-job 2013-09-18 12:43:21.000000000 +0000 @@ -59,7 +59,7 @@ my $msg = "Job $jobId finished with exit value " . $results{exitValue}; $msg .= $internal ? ' Internal job without CC notification)' : ' CC will be notified'; - EBox::info($msg); + EBox::debug($msg); if (not $internal) { # Notify CC @@ -78,7 +78,7 @@ } } otherwise { my ($exc) = @_; - EBox::error("Problem with job '$jobId' result notification: $exc"); + EBox::error("Problem with job '$jobId' result notification: $exc"); unlink($jobDir); exit(3); };