diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-03-23 16:57:25 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-03-23 16:57:25 +0000 |
commit | 19dfefb40b6189476c885d1bb1d6635583e1f8b4 (patch) | |
tree | cac056a84aaf7a93f911a450689a099be6064777 /perl-install | |
parent | 53181b8b178891787b2c7cb8f9603a0d6b9b41b3 (diff) | |
download | drakx-19dfefb40b6189476c885d1bb1d6635583e1f8b4.tar drakx-19dfefb40b6189476c885d1bb1d6635583e1f8b4.tar.gz drakx-19dfefb40b6189476c885d1bb1d6635583e1f8b4.tar.bz2 drakx-19dfefb40b6189476c885d1bb1d6635583e1f8b4.tar.xz drakx-19dfefb40b6189476c885d1bb1d6635583e1f8b4.zip |
for ISDN, do the same warning popup about supported kernels
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/network/netconnect.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 7ca92b32c..ca8ad8c6a 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -320,11 +320,15 @@ sub real_main { detect($netc->{autodetect}, 'isdn'); %isdn_cards = map { $_->{description} => $_ } @{$netc->{autodetect}{isdn}}; }, - name => N("Select the network interface to configure:") . "\n\n" . N("Sorry, we support only 2.4 and above kernels."), + name => N("Select the network interface to configure:"), data => sub { [ { label => N("Net Device"), type => "list", val => \$isdn_name, allow_empty_list => 1, list => [ $my_isdn, N("External ISDN modem"), keys %isdn_cards ] } ] }, + complete => sub { + $in->ask_warn(N("Warning"), N("Sorry, we support only 2.4 and above kernels.")) if c::kernel_version() !~ /^\Q2.4/; + return 0; + }, post => sub { # !intern_pci: # data => [ { val => \$isdn_type, type => "list", list => [ , ], } ], |