From 034c6d8da3c3c3144ad29ceb05926858f2f67ff6 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Fri, 16 Sep 2005 15:55:43 +0000
Subject: make sure $net->{ifcfg}{ppp0} is a hash

---
 perl-install/network/netconnect.pm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'perl-install')

diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index f3df13cc3..23bc560b9 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -759,6 +759,7 @@ If you do not know it, keep the preselected type."),
                     pre => sub {
                         network::adsl::adsl_probe_info($net);
                         $net->{net_interface} = 'ppp0';
+                        $net->{ifcfg}{ppp0} ||= {};
                         ($adsl_vpi, $adsl_vci) = (hex($net->{adsl}{vpi}), hex($net->{adsl}{vci}));
                     },
                     name => N("Connection Configuration") . "\n\n" .
-- 
cgit v1.2.1