From 2da3e80696847bc9cf2c7453888ae998a36269c8 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Fri, 11 Nov 2011 17:21:57 +0100 Subject: no warnings 'uninitialized'; improve line filter --- cgi/index.pl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/cgi/index.pl b/cgi/index.pl index c113466..a94a04c 100644 --- a/cgi/index.pl +++ b/cgi/index.pl @@ -8,6 +8,8 @@ use DateTime::Format::Strptime; use App::VRR::Fakedisplay; use Travel::Status::DE::VRR; +no warnings 'uninitialized'; + our $VERSION = '0.02'; sub default_no_lines { @@ -147,7 +149,7 @@ sub render_image { if ( ( @grep_line and not( $line ~~ \@grep_line ) ) or ( @grep_platform and not( $platform ~~ \@grep_platform ) ) - or ( $line =~ m{ ^ (RE | IC | EC) }x ) ) + or ( $line =~ m{ ^ (RB | RE | IC | EC) }x ) ) { next; } -- cgit v1.2.3