summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/network/netconnect.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 74234c38e..f48872887 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -700,7 +700,7 @@ Take a look at http://www.linmodems.org"),
if (!$adsl_provider) {
require lang;
my $locale_country = lang::c2name($::o->{locale}{country} || lang::read()->{country});
- $adsl_provider = find { $_ =~ /^$locale_country/ } sort(keys %adsl_data);
+ $adsl_provider = find { /^$locale_country/ } sort(keys %adsl_data);
}
},
name => N("Please choose your ADSL provider"),