summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2018-12-16 11:04:34 +0100
committerDaniel Friesel <derf@finalrewind.org>2018-12-16 11:04:34 +0100
commitea5aab03fc83b49143dda9a430e59f4fa78a6771 (patch)
tree86ca7000d32887ec3b5deda694f8a2f2a9c14b6a
parentb1d57132ff46628cae1804b450fa989e8e04b28e (diff)
route_interesting: Add .hl.n. (czech main station)
-rw-r--r--lib/Travel/Status/DE/IRIS/Result.pm5
1 files changed, 4 insertions, 1 deletions
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 );
}
}