better error message on invalid xml in log xml::roc

1 files changed, 1 insertions, 0 deletions

diff --git a/log.pl b/log.pl
index 6cdaf40..f4904c7 100755
--- a/log.pl
+++ b/log.pl
@@ -13,6 +13,7 @@ print $menu->start_html('log');
 my $cli = new local::nzbget;
 print CGI::start_table();
 my $resp = $cli->send_request('log',0,10) or die "Can't connect to nubget";
+die $resp if not ref $resp;
 foreach my $row (@{ $resp->value})
 {
   print Tr(td[$row->{Text}]);