Loading Changelog +1 −0 Original line number Diff line number Diff line git HEAD * Result: Add qos code 79 ("Ohne Mehrzweckabteil") * db-iris: Accept UIC station codes Travel::Status::DE::IRIS 1.03 - Tue Sep 15 2015 Loading bin/db-iris +4 −0 Original line number Diff line number Diff line Loading @@ -141,6 +141,10 @@ sub get_departure { sub get_station { my ($input_name) = @_; if ( $input_name =~ m{ ^ [[:digit:]]+ $ }x ) { return $input_name; } my @stations = Travel::Status::DE::IRIS::Stations::get_station($input_name); if ( @stations == 0 ) { Loading lib/Travel/Status/DE/IRIS.pm +1 −0 Original line number Diff line number Diff line Loading @@ -67,6 +67,7 @@ sub new { $self->{station} = $opt{station}; $self->{station_code} = $station_node->getAttribute('eva'); $self->{station_name} = $station_node->getAttribute('name'); my $dt_req = $self->{datetime}->clone; for ( 1 .. 3 ) { Loading Loading
Changelog +1 −0 Original line number Diff line number Diff line git HEAD * Result: Add qos code 79 ("Ohne Mehrzweckabteil") * db-iris: Accept UIC station codes Travel::Status::DE::IRIS 1.03 - Tue Sep 15 2015 Loading
bin/db-iris +4 −0 Original line number Diff line number Diff line Loading @@ -141,6 +141,10 @@ sub get_departure { sub get_station { my ($input_name) = @_; if ( $input_name =~ m{ ^ [[:digit:]]+ $ }x ) { return $input_name; } my @stations = Travel::Status::DE::IRIS::Stations::get_station($input_name); if ( @stations == 0 ) { Loading
lib/Travel/Status/DE/IRIS.pm +1 −0 Original line number Diff line number Diff line Loading @@ -67,6 +67,7 @@ sub new { $self->{station} = $opt{station}; $self->{station_code} = $station_node->getAttribute('eva'); $self->{station_name} = $station_node->getAttribute('name'); my $dt_req = $self->{datetime}->clone; for ( 1 .. 3 ) { Loading