diff options
author | Daniel Friesel <derf@finalrewind.org> | 2020-06-13 09:17:21 +0200 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2020-06-13 09:17:21 +0200 |
commit | 187e17546a8395476a119bf94d50f0c9ef780338 (patch) | |
tree | 00aa6a577b3ee55d9b0ffcf0ffb91364a90b198a /lib/Travel/Status/DE/HAFAS.pm | |
parent | 25eb5e0b20e886a98dad5b22e0df5edade383ee0 (diff) |
Result: Add operator accessor
Diffstat (limited to 'lib/Travel/Status/DE/HAFAS.pm')
-rw-r--r-- | lib/Travel/Status/DE/HAFAS.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm index e14587b..884b006 100644 --- a/lib/Travel/Status/DE/HAFAS.pm +++ b/lib/Travel/Status/DE/HAFAS.pm @@ -318,6 +318,7 @@ sub results { my $delay = $tr->getAttribute('delay'); my $e_delay = $tr->getAttribute('e_delay'); my $info = $tr->getAttribute('delayReason'); + my $operator = $tr->getAttribute('operator'); my @messages; if ( not( $time and $dest ) ) { @@ -360,6 +361,7 @@ sub results { messages => \@messages, sched_time => $time, train => $train, + operator => $operator, route_end => $dest, platform => $platform, new_platform => $new_platform, |