Unverified Commit 7d1bf772 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

result_has_via: handle HAFAS::Journey entries

Closes #18
parent 66b43a4a
Loading
Loading
Loading
Loading
+3 −1
Original line number Diff line number Diff line
@@ -210,7 +210,9 @@ sub result_has_train_type {
sub result_has_via {
	my ( $result, $via ) = @_;

	my @route = $result->route_post;
	my @route
	  = $result->can('route_post') ? $result->route_post : map { $_->loc->name }
	  $result->route;

	my $eq_result = List::MoreUtils::any { lc eq lc($via) } @route;