From 40b503cb275652544830ef2cfeb3c48a15ce177b Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 20 Feb 2003 14:09:11 +0000 Subject: log manually chosen graphic card --- perl-install/Xconfig/card.pm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'perl-install') diff --git a/perl-install/Xconfig/card.pm b/perl-install/Xconfig/card.pm index f5ee62c0f..58634405a 100644 --- a/perl-install/Xconfig/card.pm +++ b/perl-install/Xconfig/card.pm @@ -208,6 +208,8 @@ sub card_config__not_listed { format => sub { $_[0] =~ /^Vendor\|($vendors_regexp)\s*-?(.*)/ ? "Vendor|$1|$2" : $_[0] =~ /^Vendor\|(.*)/ ? "Vendor|Other|$1" : $_[0] } } ]) or return; + log::l("Xconfig::card: $r manually chosen"); + $r eq "Vendor|$card->{BoardName}" and return 1; #- it is unchanged, don't modify $card my ($kind, $s) = $r =~ /(.*?)\|(.*)/; -- cgit v1.2.1