From 172ad665d4f6da5e51828f7b0277f91ed9b18db9 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Mon, 25 Feb 2008 18:35:29 +0000 Subject: be stricter when matching provider country --- lib/network/netconnect.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/network/netconnect.pm b/lib/network/netconnect.pm index 2d0a60b..5a8e861 100644 --- a/lib/network/netconnect.pm +++ b/lib/network/netconnect.pm @@ -189,7 +189,8 @@ sub real_main { @providers_data = $connection->get_providers; require lang; my $locale_country = lang::c2name($::o->{locale}{country} || lang::read()->{country}); - $provider_name = find { /^\Q$locale_country\E/ } sort(keys %{$providers_data[0]}); + my $separator = $providers_data[1]; + $provider_name = find { /^\Q$locale_country$separator\E/ } sort(keys %{$providers_data[0]}); }, name => sub { $net->{type}->get_type_name . "\n\n" . N("Please select your provider:") }, data => sub { -- cgit v1.2.1