diff options
author | Daniel Friesel <derf@finalrewind.org> | 2019-12-29 10:45:31 +0100 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2019-12-29 10:45:31 +0100 |
commit | bd9de4e5306075d859008cb2abea643caac58c8c (patch) | |
tree | 0aeefe46b2f06809e46faa90f1cb257ce5f56f2d /lib/Travel/Status/DE/IRIS | |
parent | 5dfa3c28903fc95fd56bbed6e0ffa9e4f5d1b5bc (diff) |
release v1.411.41
Diffstat (limited to 'lib/Travel/Status/DE/IRIS')
-rw-r--r-- | lib/Travel/Status/DE/IRIS/Result.pm | 23 | ||||
-rw-r--r-- | lib/Travel/Status/DE/IRIS/Stations.pm.PL | 4 |
2 files changed, 17 insertions, 10 deletions
diff --git a/lib/Travel/Status/DE/IRIS/Result.pm b/lib/Travel/Status/DE/IRIS/Result.pm index c44df8c..c262e71 100644 --- a/lib/Travel/Status/DE/IRIS/Result.pm +++ b/lib/Travel/Status/DE/IRIS/Result.pm @@ -15,7 +15,7 @@ use List::Compare; use List::MoreUtils qw(none uniq firstval); use Scalar::Util qw(weaken); -our $VERSION = '1.40'; +our $VERSION = '1.41'; my %translation = ( 2 => 'Polizeiliche Ermittlung', @@ -828,7 +828,7 @@ arrival/departure received by Travel::Status::DE::IRIS =head1 VERSION -version 1.40 +version 1.41 =head1 DESCRIPTION @@ -870,9 +870,9 @@ True if the arrival at this stop has been cancelled. =item $result->arrival_wings -Returns a list of references to Travel::Status::DE::IRIS::Result(3pm) objects -which are coupled to this train on arrival. Returns nothing (false / empty list) -otherwise. +Returns a list of weakened references to Travel::Status::DE::IRIS::Result(3pm) +objects which are coupled to this train on arrival. Returns nothing (false / +empty list) otherwise. =item $result->canceled_stops @@ -940,9 +940,9 @@ terminates here and does not continue its scheduled journey. =item $result->departure_wings -Returns a list of references to Travel::Status::DE::IRIS::Result(3pm) objects -which are coupled to this train on departure. Returns nothing (false / empty -list) otherwise. +Returns a list of weakened references to Travel::Status::DE::IRIS::Result(3pm) +objects which are coupled to this train on departure. Returns nothing (false / +empty list) otherwise. =item $result->destination @@ -1182,6 +1182,13 @@ Number of this train, unique per day. E.g. C<< 2225 >> for C<< IC 2225 >>. Type of this train, e.g. C<< S >> for S-Bahn, C<< RE >> for Regional-Express, C<< ICE >> for InterCity-Express. +=item $result->wing_of + +If B<is_wing> is true, returns a weakened reference to the +Travel::Status::DE::IRIS::Result(3pm) object which this train is a wing of. So +far, it seems that a train is either not a wing or a wing of exactly one other +train. Returns undef if B<is_wing> is false. + =back =head2 INTERNAL diff --git a/lib/Travel/Status/DE/IRIS/Stations.pm.PL b/lib/Travel/Status/DE/IRIS/Stations.pm.PL index af0e339..758e236 100644 --- a/lib/Travel/Status/DE/IRIS/Stations.pm.PL +++ b/lib/Travel/Status/DE/IRIS/Stations.pm.PL @@ -35,7 +35,7 @@ use Text::LevenshteinXS qw(distance); # TODO switch to Text::Levenshtein::XS once AUR/Debian packages become available -our $VERSION = '1.40'; +our $VERSION = '1.41'; # Automatically generated, see share/stations.json my @stations = ( @@ -184,7 +184,7 @@ Travel::Status::DE::IRIS::Stations - Station name to station code mapping =head1 VERSION -version 1.40 +version 1.41 =head1 DESCRIPTION |