From 8ea8d2ad219666daab831fbeb56a5605dacda953 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 5 Sep 2001 11:29:12 +0000 Subject: non-case dependent EISA comparison --- perl-install/Xconfig.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/Xconfig.pm') diff --git a/perl-install/Xconfig.pm b/perl-install/Xconfig.pm index fac946783..280b7f987 100644 --- a/perl-install/Xconfig.pm +++ b/perl-install/Xconfig.pm @@ -210,7 +210,7 @@ sub getinfoFromDDC { $O->{hsyncrange} ||= $h =~ /^(\S*)/; $O->{vsyncrange} ||= $v =~ /^(\S*)/; $O->{size} ||= to_float($size); - $O->{EISA_ID} = $1 if $size =~ /EISA ID: (\S*)/; + $O->{EISA_ID} = lc($1) if $size =~ /EISA ID: (\S*)/; $O->{modelines} ||= join '', @m; $o; } -- cgit v1.2.1