diff options
| author | Daniel Friesel <derf@finalrewind.org> | 2022-07-26 10:18:47 +0200 |
|---|---|---|
| committer | Daniel Friesel <derf@finalrewind.org> | 2022-07-26 10:18:47 +0200 |
| commit | 1902055d291ede6a4646c7ba3a4da859ca30f1e0 (patch) | |
| tree | 03ee0acd83f6ebb6c5668ba8ac15022f1b5acc8a /lib/Travel/Status/DE/IRIS.pm | |
| parent | 69690b10abfaad633bc89eca275bf7f6fd32445d (diff) | |
perltidy
Diffstat (limited to 'lib/Travel/Status/DE/IRIS.pm')
| -rw-r--r-- | lib/Travel/Status/DE/IRIS.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Travel/Status/DE/IRIS.pm b/lib/Travel/Status/DE/IRIS.pm index 1a72077..cac8f9f 100644 --- a/lib/Travel/Status/DE/IRIS.pm +++ b/lib/Travel/Status/DE/IRIS.pm @@ -293,7 +293,7 @@ sub postprocess_results { for my $transfer (@merge_candidates) { my $result = first { $_->transfer and $_->transfer eq $transfer->train_id } - @{ $self->{results} }; + @{ $self->{results} }; if ($result) { $result->merge_with_departure($transfer); } @@ -848,7 +848,7 @@ sub get_result_by_train { my ( $self, $type, $train_no ) = @_; my $res = first { $_->type eq $type and $_->train_no eq $train_no } - @{ $self->{results} }; + @{ $self->{results} }; return $res; } |