diff --git a/cpanfile b/cpanfile index c2301188e23537d526159721b42b291dc982deb8..46e174e927f53ea98cd2a35f5c7a76ec48388cbc 100644 --- a/cpanfile +++ b/cpanfile @@ -17,8 +17,9 @@ requires 'Mojolicious::Plugin::OAuth2'; requires 'Mojo::Pg'; requires 'Text::CSV'; requires 'Text::Markdown'; +requires 'Travel::Status::DE::DBRIS', '>= 0.06'; requires 'Travel::Status::DE::DBWagenreihung', '== 0.18'; -requires 'Travel::Status::DE::HAFAS', '>= 5.03'; +requires 'Travel::Status::DE::HAFAS', '>= 5.03'; requires 'Travel::Status::DE::IRIS'; requires 'UUID::Tiny'; requires 'JSON'; diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm index 32d1e2f63dad2491ff6f6c152a7cae73d9342ed8..2b7fdf545b8e7f87951fb1015329cf7ef9a66939 100755 --- a/lib/Travelynx.pm +++ b/lib/Travelynx.pm @@ -19,7 +19,7 @@ use JSON; use List::Util; use List::UtilsBy qw(uniq_by); use List::MoreUtils qw(first_index); -use Travel::Status::DE::DBWagenreihung; +use Travel::Status::DE::DBRIS::Formation; use Travelynx::Helper::DBDB; use Travelynx::Helper::HAFAS; use Travelynx::Helper::IRIS; @@ -182,7 +182,7 @@ sub startup { $self->attr( ice_name => sub { state $id_to_name = { - Travel::Status::DE::DBWagenreihung::Group::name_to_designation( + Travel::Status::DE::DBRIS::Formation::Group::name_to_designation( ) }; return $id_to_name; @@ -1622,8 +1622,8 @@ sub startup { my $wr; eval { $wr - = Travel::Status::DE::DBWagenreihung->new( - from_json => $wagonorder ); + = Travel::Status::DE::DBRIS::Formation->new( + json => $wagonorder ); }; if ( $wr and $wr->sectors @@ -1768,8 +1768,8 @@ sub startup { my $wr; eval { $wr - = Travel::Status::DE::DBWagenreihung->new( - from_json => $in_transit->{data}{wagonorder_dep} ); + = Travel::Status::DE::DBRIS::Formation->new( + json => $in_transit->{data}{wagonorder_dep} ); }; if ( $wr and $wr->carriages