From 7c3c28ff9fc9cd3b2c4a79a73aa88bbd7e389c62 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Mon, 6 Sep 2004 05:58:46 +0000
Subject: keep linmodem message for Hcf and Hsf

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

(limited to 'perl-install')

diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 135286a26..ce8784c3d 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -461,6 +461,12 @@ Take a look at http://www.linmodems.org"),
                         [ { label => N("Modem"), type => "list", val => \$modem_name, allow_empty_list => 1,
                             list => [ keys %{$netc->{autodetect}{modem}}, N("Manual choice") ], } ],
                     },
+                    complete => sub {
+                        if ($netc->{autodetect}{modem}{$modem_name}{driver} =~ /^H[cs]f:/ && c::kernel_version() !~ /^\Q2.4/) {
+                            $in->ask_warn(N("Warning"), N("Sorry, we support only 2.4 and above kernels."));
+                        }
+                        return 0;
+                    },
                     post => sub {
                         $modem ||= $netcnx->{modem} ||= {};;
                         return 'choose_serial_port' if $modem_name eq N("Manual choice");
-- 
cgit v1.2.1