From 3dd1b3a53d48c5b1c76418fe37823ea97e58ccde Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Sun, 22 Sep 2024 15:08:23 +0200 Subject: Stop: Use place / name / full_name rather than just name_suf and name --- lib/Travel/Status/DE/EFA.pm | 11 ++++++----- lib/Travel/Status/DE/EFA/Stop.pm | 10 +++++++--- 2 files changed, 13 insertions(+), 8 deletions(-) (limited to 'lib/Travel/Status/DE') diff --git a/lib/Travel/Status/DE/EFA.pm b/lib/Travel/Status/DE/EFA.pm index e95bbcd..ab029df 100644 --- a/lib/Travel/Status/DE/EFA.pm +++ b/lib/Travel/Status/DE/EFA.pm @@ -419,11 +419,12 @@ sub parse_route { push( @ret, Travel::Status::DE::EFA::Stop->new( - arr => $arr, - dep => $dep, - name => $stop->{name}, - name_suf => $stop->{nameWO}, - platform => $ref->{platform} || $stop->{platformName} || undef, + arr => $arr, + dep => $dep, + full_name => $stop->{name}, + place => $stop->{place}, + name => $stop->{nameWO}, + platform => $ref->{platform} || $stop->{platformName} || undef, ) ); } diff --git a/lib/Travel/Status/DE/EFA/Stop.pm b/lib/Travel/Status/DE/EFA/Stop.pm index 250b347..609c197 100644 --- a/lib/Travel/Status/DE/EFA/Stop.pm +++ b/lib/Travel/Status/DE/EFA/Stop.pm @@ -9,7 +9,7 @@ use parent 'Class::Accessor'; our $VERSION = '2.02'; Travel::Status::DE::EFA::Stop->mk_ro_accessors( - qw(arr dep name name_suf platform)); + qw(arr dep place name full_name platform)); sub new { my ( $obj, %conf ) = @_; @@ -71,12 +71,16 @@ first scheduled stop. DateTime(3pm) object holding departure date and time. undef if this is the final scheduled stop. -=item $stop->name +=item $stop->place + +City name, for instance "Essen". + +=item $stop->full_name stop name with city prefix ("I I", for instance "Essen REttenscheider Stern"). -=item $stop->name_suf +=item $stop->name stop name without city prefix, for instance "REttenscheider Stern". -- cgit v1.2.3