summaryrefslogtreecommitdiff
path: root/lib/Net/Plesk.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Net/Plesk.pm')
-rw-r--r--lib/Net/Plesk.pm8
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/Net/Plesk.pm b/lib/Net/Plesk.pm
index 2b33c51..3e78963 100644
--- a/lib/Net/Plesk.pm
+++ b/lib/Net/Plesk.pm
@@ -214,7 +214,13 @@ sub AUTOLOAD {
$response;
}
else {
- die $res->status_line, "\n";
+ new Net::Plesk::Response (
+ '<?xml version="1.0" encoding="UTF-8"?>'. #a lie? probably safe
+ '<packet version="' . $self->{'version'} . '">' .
+ "<system><status>error</status><errcode>500</errcode>" .
+ "<errtext>" . $res->status_line . "</errtext></system>" .
+ "</packet>"
+ );
}
}