X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_export%2Facct_plesk.pm;h=d8d70a30e26ab7aeea4805499ee9b042e209d916;hb=5af515ac6bdc6ff88860c618207660eac48c276a;hp=0028a2e8624ce9395acf631c42c01dcbb1468d0c;hpb=70cbe021e8ecc7b77dc3a3c25b778d0f21fca94e;p=freeside.git diff --git a/FS/FS/part_export/acct_plesk.pm b/FS/FS/part_export/acct_plesk.pm index 0028a2e86..d8d70a30e 100644 --- a/FS/FS/part_export/acct_plesk.pm +++ b/FS/FS/part_export/acct_plesk.pm @@ -23,7 +23,7 @@ Real-time export to Plesk managed server. Requires installation of Net::Plesk -from CPAN. +from CPAN and proper configuration. END ); @@ -47,7 +47,7 @@ sub _export_insert { sub _plesk_command { my( $self, $method, $domain, @args ) = @_; - eval "use Net::Plesk'"; + eval "use Net::Plesk;"; return $@ if $@; local($Net::Plesk::DEBUG) = 1 @@ -60,7 +60,7 @@ sub _plesk_command { ); my $dresponse = $plesk->domain_get( $domain ); - return $dresponse->error unless $dresponse->is_success; + return $dresponse->errortext unless $dresponse->is_success; my $domainID = $dresponse->id; my $response = $plesk->$method($dresponse->id, @args);