diff options
| author | Daniel Friesel <derf@finalrewind.org> | 2011-11-11 13:37:49 +0100 |
|---|---|---|
| committer | Daniel Friesel <derf@finalrewind.org> | 2011-11-11 13:37:49 +0100 |
| commit | 5a70000edf314d0b8e68f5a58afc8be84605f14c (patch) | |
| tree | fc30fca2cc1b6c61979cdce6cd56d31246622b90 /cgi | |
| parent | e27c94c1fdcb051db50d4b8bc89a0f9026aa59c8 (diff) | |
filter all trains except S-Bahn (mostly for main stations)
Diffstat (limited to 'cgi')
| -rw-r--r-- | cgi/index.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/cgi/index.pl b/cgi/index.pl index 7fafc4f..c113466 100644 --- a/cgi/index.pl +++ b/cgi/index.pl @@ -146,7 +146,8 @@ sub render_image { my $dt; if ( ( @grep_line and not( $line ~~ \@grep_line ) ) - or ( @grep_platform and not( $platform ~~ \@grep_platform ) ) ) + or ( @grep_platform and not( $platform ~~ \@grep_platform ) ) + or ( $line =~ m{ ^ (RE | IC | EC) }x ) ) { next; } |