From 743ca434f43293e3701fa2671305800d0dedf877 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Tue, 19 Apr 2005 23:42:43 +0000 Subject: simplify --- perl-install/network/netconnect.pm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'perl-install') diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 55df2453b..e623cad3e 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -997,10 +997,8 @@ You can find a driver on http://eciadsl.flashtux.org/"), undef $ndiswrapper_driver; undef $ndiswrapper_device; unless (network::wireless::ndiswrapper_installed_drivers()) { - if ($ndiswrapper_driver = network::wireless::ndiswrapper_ask_driver($in)) { - return !$ndiswrapper_do_driver_selection->(); - } - return 1; + $ndiswrapper_driver = network::wireless::ndiswrapper_ask_driver($in) or return 1; + return !$ndiswrapper_do_driver_selection->(); } } 0; -- cgit v1.2.1