diff options
| author | Daniel Friesel <derf@finalrewind.org> | 2014-01-16 14:57:00 +0100 |
|---|---|---|
| committer | Daniel Friesel <derf@finalrewind.org> | 2014-01-16 14:57:00 +0100 |
| commit | eccf8ca2b1d6625a2d17d12ab2f0dbc5d49fac75 (patch) | |
| tree | e6335abdeb79d57b8511e9f2340615d40977554a /t/21-vrr.t | |
| parent | 937a09c0845abd97a9b216d6e34b5747b95ac9f5 (diff) | |
Move EFA logic to ::EFA, just set URL in ::VRR
Diffstat (limited to 't/21-vrr.t')
| -rw-r--r-- | t/21-vrr.t | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -10,24 +10,24 @@ use File::Slurp qw(slurp); use Test::More tests => 74; BEGIN { - use_ok('Travel::Routing::DE::VRR'); + use_ok('Travel::Routing::DE::EFA'); } -require_ok('Travel::Routing::DE::VRR'); +require_ok('Travel::Routing::DE::EFA'); my $xml = slurp('t/in/e_alf_d_hbf.xml'); -my $routing = Travel::Routing::DE::VRR->new_from_xml( xml => $xml ); +my $routing = Travel::Routing::DE::EFA->new_from_xml( xml => $xml ); -isa_ok( $routing, 'Travel::Routing::DE::VRR' ); +isa_ok( $routing, 'Travel::Routing::DE::EFA' ); can_ok( $routing, 'routes' ); for my $r ( $routing->routes ) { - isa_ok( $r, 'Travel::Routing::DE::VRR::Route' ); + isa_ok( $r, 'Travel::Routing::DE::EFA::Route' ); can_ok( $r, qw(duration parts ticket_type fare_adult fare_child vehicle_time) ); for my $c ( $r->parts ) { - isa_ok( $c, 'Travel::Routing::DE::VRR::Route::Part' ); + isa_ok( $c, 'Travel::Routing::DE::EFA::Route::Part' ); can_ok( $c, qw( arrival_stop arrival_platform arrival_stop_and_platform |