Commit f9fa576b authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

bin/efa: Actually use Travel::Routing, not Net::Travel...

parent db6e0311

bin/efa

+2 −2
Original line number Diff line number Diff line
@@ -6,7 +6,7 @@ use strict; 
use warnings;

use 5.010;



use Net::Travel::DE::VRR;

use Travel::Routing::DE::VRR;

use Getopt::Long qw/:config no_ignore_case/;



our $VERSION = '1.3';
@@ -80,7 +80,7 @@ if ( defined $opt->{'ignore-info'} and length( $opt->{'ignore-info'} ) == 0 ) { 
	$opt->{'ignore-info'} = undef;

}



$efa = Net::Travel::DE::VRR->new(

$efa = Travel::Routing::DE::VRR->new(

	origin      => [ @from, $from_type ],

	destination => [ @to,   $to_type ],

	via => ( @via ? [ @via, $via_type ] : undef ),