diff options
Diffstat (limited to 'lib/Net/Plesk.pm')
-rw-r--r-- | lib/Net/Plesk.pm | 8 |
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>" + ); } } |