diff options
-rw-r--r-- | lib/DBInfoscreen/Helper/HAFAS.pm | 6 | ||||
-rw-r--r-- | lib/DBInfoscreen/Helper/Marudor.pm | 7 |
2 files changed, 13 insertions, 0 deletions
diff --git a/lib/DBInfoscreen/Helper/HAFAS.pm b/lib/DBInfoscreen/Helper/HAFAS.pm index b97248d..2b8172e 100644 --- a/lib/DBInfoscreen/Helper/HAFAS.pm +++ b/lib/DBInfoscreen/Helper/HAFAS.pm @@ -62,6 +62,12 @@ sub get_json_p { my $json = decode_json($body); + if ( not $json ) { + $self->{log}->debug("hafas->get_json_p($url): empty response"); + $promise->reject("GET $url returned empty response"); + return; + } + $cache->freeze( $url, $json ); $promise->resolve($json); diff --git a/lib/DBInfoscreen/Helper/Marudor.pm b/lib/DBInfoscreen/Helper/Marudor.pm index 21083a7..dad9dc7 100644 --- a/lib/DBInfoscreen/Helper/Marudor.pm +++ b/lib/DBInfoscreen/Helper/Marudor.pm @@ -55,6 +55,13 @@ sub get_json_p { my $res = $tx->res->json; + if ( not $res ) { + $self->{log} + ->debug("marudor->get_json_p($url): empty response"); + $promise->reject("GET $url returned empty response"); + return; + } + $cache->freeze( $url, $res ); $promise->resolve($res); |