Loading lib/Travel/Status/DE/EFA.pm +9 −0 Changes for lib/Travel/Status/DE/EFA.pm: 9 added lines, 0 removed lines. Original line number Diff line number Diff line Loading @@ -572,6 +572,15 @@ sub results_stopfinder { my $json = $self->{response}; my @results; # Edge case: there is just a single result. # Oh EFA, you so silly. if ( ref( $json->{stopFinder}{points} ) eq 'HASH' and exists $json->{stopFinder}{points}{point} ) { $json->{stopFinder}{points} = [ $json->{stopFinder}{points}{point} ]; } for my $stop ( @{ $json->{stopFinder}{points} // [] } ) { push( @results, Loading Loading
lib/Travel/Status/DE/EFA.pm +9 −0 Changes for lib/Travel/Status/DE/EFA.pm: 9 added lines, 0 removed lines. Original line number Diff line number Diff line Loading @@ -572,6 +572,15 @@ sub results_stopfinder { my $json = $self->{response}; my @results; # Edge case: there is just a single result. # Oh EFA, you so silly. if ( ref( $json->{stopFinder}{points} ) eq 'HASH' and exists $json->{stopFinder}{points}{point} ) { $json->{stopFinder}{points} = [ $json->{stopFinder}{points}{point} ]; } for my $stop ( @{ $json->{stopFinder}{points} // [] } ) { push( @results, Loading