summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-08-18 05:59:36 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-08-18 05:59:36 +0000
commit1bf4d3b7f6051eeb18c922f6b757621ad97ed192 (patch)
treed2c2bb82758c1d7d6d4458d440e39d8104ecc5c3 /perl-install
parent6b69393d2b0c2911f486ca6c0046ccf6e1a3f238 (diff)
downloaddrakx-1bf4d3b7f6051eeb18c922f6b757621ad97ed192.tar
drakx-1bf4d3b7f6051eeb18c922f6b757621ad97ed192.tar.gz
drakx-1bf4d3b7f6051eeb18c922f6b757621ad97ed192.tar.bz2
drakx-1bf4d3b7f6051eeb18c922f6b757621ad97ed192.tar.xz
drakx-1bf4d3b7f6051eeb18c922f6b757621ad97ed192.zip
no_comment
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/Xconfigurator.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm
index 5c61322c0..c1dcefcfa 100644
--- a/perl-install/Xconfigurator.pm
+++ b/perl-install/Xconfigurator.pm
@@ -148,9 +148,8 @@ sub keepOnlyLegalModes {
sub cardConfigurationAuto() {
my $card;
- if (my ($c) = detect_devices::probeall()) {
+ if (my ($c) = grep { $_->{driver} =~ /(Card|Server):/ } detect_devices::probeall()) {
local $_ = $c->{driver};
- /(Card|Server):/ or next;
$card->{type} = $1 if /Card:(.*)/;
$card->{server} = $1 if /Server:(.*)/;
$card->{flags}{needVideoRam} &&= /86c368/;