From 11b68871159b69da5ba88b32ed3344568b861089 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 22 Jan 2004 15:18:10 +0000 Subject: fix typo fix --- perl-install/network/netconnect.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index c608f40f3..e0ba4c364 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -533,7 +533,7 @@ killall pppd ); my $adsl_device = find { $adsl_devices{$_} eq $ntf_name } keys %adsl_devices; print "package: $ntf_name => $adsl_device => $packages{$adsl_device}\n"; - $netconnect::need_restart_network = member($adsl_device qw(speedtouch eci)); + $netconnect::need_restart_network = member($adsl_device, qw(speedtouch eci)); $in->do_pkgs->install($packages{$adsl_device}) if $packages{$adsl_device}; return 'adsl_protocol'; }, -- cgit v1.2.1