Loading Changelog +7 −0 Original line number Original line Diff line number Diff line Travel::Status::DE::IRIS 1.41 - Sun Dec 29 2019 * Result: Add "wing_of" accessor * Follow name and DS100 change of Freiburg West (RFW) to Freiburg-Landwasser (RFLW) * Add more stations Travel::Status::DE::IRIS 1.40 - Tue Dec 25 2019 Travel::Status::DE::IRIS 1.40 - Tue Dec 25 2019 * Incorporate the last few years' worth of station name changes * Incorporate the last few years' worth of station name changes Loading bin/db-iris +2 −2 Original line number Original line Diff line number Diff line Loading @@ -6,7 +6,7 @@ use utf8; no if $] >= 5.018, warnings => 'experimental::smartmatch'; no if $] >= 5.018, warnings => 'experimental::smartmatch'; our $VERSION = '1.40'; our $VERSION = '1.41'; use DateTime; use DateTime; use DateTime::Format::Strptime; use DateTime::Format::Strptime; Loading Loading @@ -533,7 +533,7 @@ B<db-iris> [B<-rx>] [B<-d> I<date>] [B<-o> I<output-flags>] =head1 VERSION =head1 VERSION version 1.40 version 1.41 =head1 DESCRIPTION =head1 DESCRIPTION Loading lib/Travel/Status/DE/IRIS.pm +2 −2 Original line number Original line Diff line number Diff line Loading @@ -6,7 +6,7 @@ use 5.014; no if $] >= 5.018, warnings => 'experimental::smartmatch'; no if $] >= 5.018, warnings => 'experimental::smartmatch'; our $VERSION = '1.40'; our $VERSION = '1.41'; use Carp qw(confess cluck); use Carp qw(confess cluck); use DateTime; use DateTime; Loading Loading @@ -630,7 +630,7 @@ Travel::Status::DE::IRIS - Interface to IRIS based web departure monitors. =head1 VERSION =head1 VERSION version 1.40 version 1.41 =head1 DESCRIPTION =head1 DESCRIPTION Loading lib/Travel/Status/DE/IRIS/Result.pm +15 −8 Original line number Original line Diff line number Diff line Loading @@ -15,7 +15,7 @@ use List::Compare; use List::MoreUtils qw(none uniq firstval); use List::MoreUtils qw(none uniq firstval); use Scalar::Util qw(weaken); use Scalar::Util qw(weaken); our $VERSION = '1.40'; our $VERSION = '1.41'; my %translation = ( my %translation = ( 2 => 'Polizeiliche Ermittlung', 2 => 'Polizeiliche Ermittlung', Loading Loading @@ -828,7 +828,7 @@ arrival/departure received by Travel::Status::DE::IRIS =head1 VERSION =head1 VERSION version 1.40 version 1.41 =head1 DESCRIPTION =head1 DESCRIPTION Loading Loading @@ -870,9 +870,9 @@ True if the arrival at this stop has been cancelled. =item $result->arrival_wings =item $result->arrival_wings Returns a list of references to Travel::Status::DE::IRIS::Result(3pm) objects Returns a list of weakened references to Travel::Status::DE::IRIS::Result(3pm) which are coupled to this train on arrival. Returns nothing (false / empty list) objects which are coupled to this train on arrival. Returns nothing (false / otherwise. empty list) otherwise. =item $result->canceled_stops =item $result->canceled_stops Loading Loading @@ -940,9 +940,9 @@ terminates here and does not continue its scheduled journey. =item $result->departure_wings =item $result->departure_wings Returns a list of references to Travel::Status::DE::IRIS::Result(3pm) objects Returns a list of weakened references to Travel::Status::DE::IRIS::Result(3pm) which are coupled to this train on departure. Returns nothing (false / empty objects which are coupled to this train on departure. Returns nothing (false / list) otherwise. empty list) otherwise. =item $result->destination =item $result->destination Loading Loading @@ -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, Type of this train, e.g. C<< S >> for S-Bahn, C<< RE >> for Regional-Express, C<< ICE >> for InterCity-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 =back =head2 INTERNAL =head2 INTERNAL Loading lib/Travel/Status/DE/IRIS/Stations.pm.PL +2 −2 Original line number Original line Diff line number Diff line Loading @@ -35,7 +35,7 @@ use Text::LevenshteinXS qw(distance); # TODO switch to Text::Levenshtein::XS once AUR/Debian packages become available # 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 # Automatically generated, see share/stations.json my @stations = ( my @stations = ( Loading Loading @@ -184,7 +184,7 @@ Travel::Status::DE::IRIS::Stations - Station name to station code mapping =head1 VERSION =head1 VERSION version 1.40 version 1.41 =head1 DESCRIPTION =head1 DESCRIPTION Loading Loading
Changelog +7 −0 Original line number Original line Diff line number Diff line Travel::Status::DE::IRIS 1.41 - Sun Dec 29 2019 * Result: Add "wing_of" accessor * Follow name and DS100 change of Freiburg West (RFW) to Freiburg-Landwasser (RFLW) * Add more stations Travel::Status::DE::IRIS 1.40 - Tue Dec 25 2019 Travel::Status::DE::IRIS 1.40 - Tue Dec 25 2019 * Incorporate the last few years' worth of station name changes * Incorporate the last few years' worth of station name changes Loading
bin/db-iris +2 −2 Original line number Original line Diff line number Diff line Loading @@ -6,7 +6,7 @@ use utf8; no if $] >= 5.018, warnings => 'experimental::smartmatch'; no if $] >= 5.018, warnings => 'experimental::smartmatch'; our $VERSION = '1.40'; our $VERSION = '1.41'; use DateTime; use DateTime; use DateTime::Format::Strptime; use DateTime::Format::Strptime; Loading Loading @@ -533,7 +533,7 @@ B<db-iris> [B<-rx>] [B<-d> I<date>] [B<-o> I<output-flags>] =head1 VERSION =head1 VERSION version 1.40 version 1.41 =head1 DESCRIPTION =head1 DESCRIPTION Loading
lib/Travel/Status/DE/IRIS.pm +2 −2 Original line number Original line Diff line number Diff line Loading @@ -6,7 +6,7 @@ use 5.014; no if $] >= 5.018, warnings => 'experimental::smartmatch'; no if $] >= 5.018, warnings => 'experimental::smartmatch'; our $VERSION = '1.40'; our $VERSION = '1.41'; use Carp qw(confess cluck); use Carp qw(confess cluck); use DateTime; use DateTime; Loading Loading @@ -630,7 +630,7 @@ Travel::Status::DE::IRIS - Interface to IRIS based web departure monitors. =head1 VERSION =head1 VERSION version 1.40 version 1.41 =head1 DESCRIPTION =head1 DESCRIPTION Loading
lib/Travel/Status/DE/IRIS/Result.pm +15 −8 Original line number Original line Diff line number Diff line Loading @@ -15,7 +15,7 @@ use List::Compare; use List::MoreUtils qw(none uniq firstval); use List::MoreUtils qw(none uniq firstval); use Scalar::Util qw(weaken); use Scalar::Util qw(weaken); our $VERSION = '1.40'; our $VERSION = '1.41'; my %translation = ( my %translation = ( 2 => 'Polizeiliche Ermittlung', 2 => 'Polizeiliche Ermittlung', Loading Loading @@ -828,7 +828,7 @@ arrival/departure received by Travel::Status::DE::IRIS =head1 VERSION =head1 VERSION version 1.40 version 1.41 =head1 DESCRIPTION =head1 DESCRIPTION Loading Loading @@ -870,9 +870,9 @@ True if the arrival at this stop has been cancelled. =item $result->arrival_wings =item $result->arrival_wings Returns a list of references to Travel::Status::DE::IRIS::Result(3pm) objects Returns a list of weakened references to Travel::Status::DE::IRIS::Result(3pm) which are coupled to this train on arrival. Returns nothing (false / empty list) objects which are coupled to this train on arrival. Returns nothing (false / otherwise. empty list) otherwise. =item $result->canceled_stops =item $result->canceled_stops Loading Loading @@ -940,9 +940,9 @@ terminates here and does not continue its scheduled journey. =item $result->departure_wings =item $result->departure_wings Returns a list of references to Travel::Status::DE::IRIS::Result(3pm) objects Returns a list of weakened references to Travel::Status::DE::IRIS::Result(3pm) which are coupled to this train on departure. Returns nothing (false / empty objects which are coupled to this train on departure. Returns nothing (false / list) otherwise. empty list) otherwise. =item $result->destination =item $result->destination Loading Loading @@ -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, Type of this train, e.g. C<< S >> for S-Bahn, C<< RE >> for Regional-Express, C<< ICE >> for InterCity-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 =back =head2 INTERNAL =head2 INTERNAL Loading
lib/Travel/Status/DE/IRIS/Stations.pm.PL +2 −2 Original line number Original line Diff line number Diff line Loading @@ -35,7 +35,7 @@ use Text::LevenshteinXS qw(distance); # TODO switch to Text::Levenshtein::XS once AUR/Debian packages become available # 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 # Automatically generated, see share/stations.json my @stations = ( my @stations = ( Loading Loading @@ -184,7 +184,7 @@ Travel::Status::DE::IRIS::Stations - Station name to station code mapping =head1 VERSION =head1 VERSION version 1.40 version 1.41 =head1 DESCRIPTION =head1 DESCRIPTION Loading
