From 86722a4fa610507e756d16da029aa88cec0e9c45 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Fri, 26 Apr 2002 13:34:18 +0000 Subject: fixed some machine with two present i830 CGC but only one in reality. --- perl-install/Xconfigurator.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index 6e849c3e6..022409ab5 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -158,6 +158,7 @@ sub keepOnlyLegalModes { sub cardConfigurationAuto() { my @cards; if (my @c = grep { $_->{driver} =~ /(Card|Server):/ } detect_devices::probeall()) { + @c >= 2 && $c[0]{description} eq $c[1]{description} && $c[0]{description} =~ /82830 CGC/ and shift @c; foreach my $i (0..$#c) { local $_ = $c[$i]->{driver}; my $card = { identifier => ($c[$i]{description} . (@c > 1 && " $i")) }; -- cgit v1.2.1