Loading lib/DBInfoscreen/Controller/Map.pm +3 −0 Original line number Diff line number Diff line Loading @@ -31,6 +31,7 @@ sub get_hafas_polyline_p { if ( my $content = $cache->thaw($url) ) { $promise->resolve($content); $self->app->log->debug("GET $url (cached)"); return $promise; } Loading @@ -40,6 +41,7 @@ sub get_hafas_polyline_p { ->then( sub { my ($tx) = @_; $self->app->log->debug("GET $url (OK)"); my $json = decode_json( $tx->res->body ); my @coordinate_list; Loading @@ -65,6 +67,7 @@ sub get_hafas_polyline_p { )->catch( sub { my ($err) = @_; $self->app->log->debug("GET $url (error: $err)"); $promise->reject($err); } )->wait; Loading lib/DBInfoscreen/Controller/Wagenreihung.pm +3 −0 Original line number Diff line number Diff line Loading @@ -25,6 +25,7 @@ sub get_wagenreihung_p { if ( my $content = $cache->thaw($url) ) { $promise->resolve($content); $self->app->log->debug("GET $url (cached)"); return $promise; } Loading @@ -33,6 +34,7 @@ sub get_wagenreihung_p { ->then( sub { my ($tx) = @_; $self->app->log->debug("GET $url (OK)"); my $body = decode( 'utf-8', $tx->res->body ); my $json = JSON->new->decode($body); Loading @@ -42,6 +44,7 @@ sub get_wagenreihung_p { )->catch( sub { my ($err) = @_; $self->app->log->debug("GET $url (error: $err)"); $promise->reject($err); } )->wait; Loading Loading
lib/DBInfoscreen/Controller/Map.pm +3 −0 Original line number Diff line number Diff line Loading @@ -31,6 +31,7 @@ sub get_hafas_polyline_p { if ( my $content = $cache->thaw($url) ) { $promise->resolve($content); $self->app->log->debug("GET $url (cached)"); return $promise; } Loading @@ -40,6 +41,7 @@ sub get_hafas_polyline_p { ->then( sub { my ($tx) = @_; $self->app->log->debug("GET $url (OK)"); my $json = decode_json( $tx->res->body ); my @coordinate_list; Loading @@ -65,6 +67,7 @@ sub get_hafas_polyline_p { )->catch( sub { my ($err) = @_; $self->app->log->debug("GET $url (error: $err)"); $promise->reject($err); } )->wait; Loading
lib/DBInfoscreen/Controller/Wagenreihung.pm +3 −0 Original line number Diff line number Diff line Loading @@ -25,6 +25,7 @@ sub get_wagenreihung_p { if ( my $content = $cache->thaw($url) ) { $promise->resolve($content); $self->app->log->debug("GET $url (cached)"); return $promise; } Loading @@ -33,6 +34,7 @@ sub get_wagenreihung_p { ->then( sub { my ($tx) = @_; $self->app->log->debug("GET $url (OK)"); my $body = decode( 'utf-8', $tx->res->body ); my $json = JSON->new->decode($body); Loading @@ -42,6 +44,7 @@ sub get_wagenreihung_p { )->catch( sub { my ($err) = @_; $self->app->log->debug("GET $url (error: $err)"); $promise->reject($err); } )->wait; Loading