From 4b1936b7b0ef3985014ab322197e5ec3a61a6055 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 27 Mar 2021 11:34:29 +0100 Subject: Result: Add train_no accessor --- lib/Travel/Status/DE/EFA.pm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lib/Travel/Status/DE/EFA.pm') diff --git a/lib/Travel/Status/DE/EFA.pm b/lib/Travel/Status/DE/EFA.pm index 1c75c40..92fb193 100644 --- a/lib/Travel/Status/DE/EFA.pm +++ b/lib/Travel/Status/DE/EFA.pm @@ -443,6 +443,7 @@ sub results { my $countdown = $e->getAttribute('countdown'); my $occupancy = $e->getAttribute('occupancy'); my $line = $e_line->getAttribute('number'); + my $train_no = $e_line->getAttribute('trainNum'); my $dest = $e_line->getAttribute('direction'); my $info = $e_info->textContent; my $key = $e_line->getAttribute('key'); @@ -501,6 +502,7 @@ sub results { key => $key, lineref => $line_obj[0] // undef, line => $line, + train_no => $train_no, destination => $dest, occupancy => $occupancy, countdown => $countdown, -- cgit v1.2.3