simplify isdn detection:

- no need to pass a ref around; if it's bound to be overwritten, just return a
  new hash
- let isdn_detect only care of which fields we want for isdn stuff

1 files changed, 1 insertions, 3 deletions

diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 399afcd92..09bc30243 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -16,10 +16,8 @@ my %conf;
 
 sub detect {
     my ($auto_detect) = @_;
-    my $isdn = {};
     require network::isdn;
-    network::isdn::isdn_detect_backend($isdn);
-    $auto_detect->{isdn}{$_} = $isdn->{$_} foreach qw(description vendor id driver card_type type);
+    $auto_detect->{isdn} = network::isdn::isdn_detect_backend();
     $auto_detect->{isdn}{description} =~ s/.*\|//;
 
     modules::load_category('network/main|gigabit|usb');