summaryrefslogtreecommitdiff
path: root/cgi/index.pl
diff options
context:
space:
mode:
Diffstat (limited to 'cgi/index.pl')
-rw-r--r--cgi/index.pl11
1 files changed, 11 insertions, 0 deletions
diff --git a/cgi/index.pl b/cgi/index.pl
index e9fff98..04bbb7d 100644
--- a/cgi/index.pl
+++ b/cgi/index.pl
@@ -109,6 +109,10 @@ sub render_image {
my ( $results, $errstr ) = get_results_for( $city, $stop );
+ if ($errstr) {
+ $color = '255,0,0';
+ }
+
my $strp_simple = DateTime::Format::Strptime->new(
pattern => '%H:%M',
time_zone => 'floating',
@@ -139,6 +143,13 @@ sub render_image {
color => [ split( qr{,}, $color ) ]
);
+ if ($errstr) {
+ $png->draw_at(6, '-------efa.vrr.de error-------');
+ $png->new_line();
+ $png->new_line();
+ $png->draw_at(0, $errstr);
+ }
+
$self->res->headers->content_type('image/png');
for my $d ( @{$results} ) {