diff options
author | Daniel Friesel <derf@finalrewind.org> | 2011-11-11 17:21:57 +0100 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2011-11-11 17:21:57 +0100 |
commit | 2da3e80696847bc9cf2c7453888ae998a36269c8 (patch) | |
tree | c6ac825ffaeaf2f9cb9f5c86b63ace8160d5a681 /cgi | |
parent | d61ae0681fba3637771d8461a932e09904e6d253 (diff) |
no warnings 'uninitialized'; improve line filter
Diffstat (limited to 'cgi')
-rw-r--r-- | cgi/index.pl | 4 |
1 files changed, 3 insertions, 1 deletions
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; } |