summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2019-06-11 19:37:35 +0200
committerDaniel Friesel <derf@finalrewind.org>2019-06-11 19:37:35 +0200
commitc31dd4e994aadda148b45788513a80e53ad467a3 (patch)
tree65be3c5ffdecf991f2375592e186c6bdbaa7ce64
parent8b50719b6f19f04b675edb2fa6c02610752d467e (diff)
add comment for code 14; perltidy
-rw-r--r--lib/Travel/Status/DE/IRIS/Result.pm10
1 files changed, 6 insertions, 4 deletions
diff --git a/lib/Travel/Status/DE/IRIS/Result.pm b/lib/Travel/Status/DE/IRIS/Result.pm
index e576109..d5b1d73 100644
--- a/lib/Travel/Status/DE/IRIS/Result.pm
+++ b/lib/Travel/Status/DE/IRIS/Result.pm
@@ -30,7 +30,9 @@ my %translation = (
11 => 'Unwetter',
12 => 'Warten auf Fahrgäste aus einem Schiff',
13 => 'Pass- und Zollkontrolle',
- 14 => 'Technische Störung am Bahnhof',
+
+ # https://twitter.com/gleis3a/status/1138174888726925312
+ 14 => 'Technische Störung am Bahnhof',
15 => 'Beeinträchtigung durch Vandalismus',
16 => 'Entschärfung einer Fliegerbombe',
17 => 'Beschädigung einer Brücke',
@@ -281,7 +283,7 @@ sub set_ar {
}
if ( $attrib{route_pre} ) {
- $self->{route_pre} = [ split( qr{[|]}, $attrib{route_pre} // q{} ) ];
+ $self->{route_pre} = [ split( qr{[|]}, $attrib{route_pre} // q{} ) ];
$self->{route_start} = $self->{route_pre}[0];
}
else {
@@ -343,7 +345,7 @@ sub set_dp {
if ( $attrib{route_post} ) {
$self->{route_post} = [ split( qr{[|]}, $attrib{route_post} // q{} ) ];
- $self->{route_end} = $self->{route_post}[-1];
+ $self->{route_end} = $self->{route_post}[-1];
}
else {
$self->{route_post} = $self->{sched_route_post};
@@ -644,7 +646,7 @@ sub info {
my ($self) = @_;
my @messages = sort keys %{ $self->{messages} };
- my @ids = uniq( map { $self->{messages}{$_}->[2] } @messages );
+ my @ids = uniq( map { $self->{messages}{$_}->[2] } @messages );
my @info = map { $self->translate_msg($_) } @ids;