From 9015d556eb2a60b3ea0b753605887631e3f722be Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 3 Dec 2011 10:38:41 +0100 Subject: version++ --- cgi/index.pl | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'cgi/index.pl') diff --git a/cgi/index.pl b/cgi/index.pl index 80cf5c3..7da21ac 100644 --- a/cgi/index.pl +++ b/cgi/index.pl @@ -11,7 +11,7 @@ use Travel::Status::DE::VRR; no warnings 'uninitialized'; -our $VERSION = '0.03'; +our $VERSION = '0.04'; sub default_no_lines { return 5; @@ -89,6 +89,8 @@ sub handle_request { sub shorten_line { my ($line) = @_; + $line =~ s{ \s* S-Bahn }{}ox; + $line =~ s{ ^ ( U | S | SB ) \K \s+ }{}ox; $line =~ s{ ^ ( STR | Bus ) }{}ox; @@ -175,7 +177,7 @@ sub render_image { ); if ($errstr) { - $png->draw_at( 6, '-------efa.vrr.de error-------' ); + $png->draw_at( 6, '--------backend error--------' ); $png->new_line(); $png->new_line(); $png->draw_at( 0, $errstr ); @@ -194,7 +196,6 @@ sub render_image { // $strp_simple->parse_datetime($time); my $dt; - $line =~ s{ \s* S-Bahn }{}ox; if ( ( @grep_line and not( grep { $line =~ $_ } @grep_line ) ) or ( @grep_platform and not( $platform ~~ \@grep_platform ) ) -- cgit v1.2.3