summaryrefslogtreecommitdiffstats
path: root/perl-install/network
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-02-10 13:59:55 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-02-10 13:59:55 +0000
commitdec2882ea7fe42948cc596907f7a340bcd3bc65f (patch)
tree50fa933260d48f6e546f005699e3bd972838fd21 /perl-install/network
parentfc2ade7c796e8cf29c19fce5815a28e01f1fd199 (diff)
downloaddrakx-backup-do-not-use-dec2882ea7fe42948cc596907f7a340bcd3bc65f.tar
drakx-backup-do-not-use-dec2882ea7fe42948cc596907f7a340bcd3bc65f.tar.gz
drakx-backup-do-not-use-dec2882ea7fe42948cc596907f7a340bcd3bc65f.tar.bz2
drakx-backup-do-not-use-dec2882ea7fe42948cc596907f7a340bcd3bc65f.tar.xz
drakx-backup-do-not-use-dec2882ea7fe42948cc596907f7a340bcd3bc65f.zip
do not allow to step forward if no network card was found (workaround
#7672). we'd better be able to manually add an unsupported network card though.
Diffstat (limited to 'perl-install/network')
-rw-r--r--perl-install/network/netconnect.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index bb6a7d8e6..8b199f30e 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -737,6 +737,12 @@ You can find a driver on http://eciadsl.flashtux.org/"),
[ { label => N("Net Device"), type => "list", val => \$ntf_name, list => [ sort keys %eth_intf ],
allow_empty_list => 1, format => sub { $eth_intf{$_[0]} } } ];
},
+ complete => sub {
+ if (!keys %eth_intf) {
+ $in->ask_warn(N("Error"), N("No network adapter on your system!"));
+ return 1;
+ };
+ },
post => sub {
$ethntf = $intf->{$ntf_name} ||= { DEVICE => $ntf_name };
$::isInstall && $netc->{NET_DEVICE} eq $ethntf->{DEVICE} ? 'lan_alrd_cfg' : 'lan_protocol';