Skip to content
Snippets Groups Projects
Commit d630acf1 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

efa -s: use case insensitive matching

parent bd43bba1
No related branches found
No related tags found
No related merge requests found
......@@ -235,7 +235,7 @@ if ( $opt->{exclude} ) {
}
if ( $opt->{service} ) {
my $service = first { $_->{shortname} eq $opt->{service} }
my $service = first { lc($_->{shortname}) eq lc($opt->{service}) }
Travel::Routing::DE::EFA::get_efa_urls();
if ( not $service ) {
printf STDERR (
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment