From ea5aab03fc83b49143dda9a430e59f4fa78a6771 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sun, 16 Dec 2018 11:04:34 +0100 Subject: route_interesting: Add .hl.n. (czech main station) --- lib/Travel/Status/DE/IRIS/Result.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lib/Travel/Status/DE/IRIS/Result.pm b/lib/Travel/Status/DE/IRIS/Result.pm index 530aab1..d6ae398 100644 --- a/lib/Travel/Status/DE/IRIS/Result.pm +++ b/lib/Travel/Status/DE/IRIS/Result.pm @@ -683,8 +683,11 @@ sub route_interesting { my ( @via_main, @via_show, $last_stop ); $max_parts //= 3; + # Centraal: dutch main station (Hbf in .nl) + # HB: swiss main station (Hbf in .ch) + # hl.n.: czech main station (Hbf in .cz) for my $stop (@via) { - if ( $stop =~ m{ HB $ | Hbf | Centraal | Flughafen }x ) { + if ( $stop =~ m{ HB $ | hl\.n\. $ | Hbf | Centraal | Flughafen }x ) { push( @via_main, $stop ); } } -- cgit v1.2.3