diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-09-05 11:29:12 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-09-05 11:29:12 +0000 |
commit | 8ea8d2ad219666daab831fbeb56a5605dacda953 (patch) | |
tree | 177c997c125b6c942c5057664986b6cfaa0e172d /perl-install | |
parent | 099d5615b0763d1fd7ade2bd7f9a54700bd7aec5 (diff) | |
download | drakx-backup-do-not-use-8ea8d2ad219666daab831fbeb56a5605dacda953.tar drakx-backup-do-not-use-8ea8d2ad219666daab831fbeb56a5605dacda953.tar.gz drakx-backup-do-not-use-8ea8d2ad219666daab831fbeb56a5605dacda953.tar.bz2 drakx-backup-do-not-use-8ea8d2ad219666daab831fbeb56a5605dacda953.tar.xz drakx-backup-do-not-use-8ea8d2ad219666daab831fbeb56a5605dacda953.zip |
non-case dependent EISA comparison
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/Xconfig.pm | 2 | ||||
-rw-r--r-- | perl-install/Xconfigurator.pm | 2 |
2 files changed, 2 insertions, 2 deletions
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; } diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index 016d510fd..8daf6a726 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -493,7 +493,7 @@ sub monitorConfiguration(;$$) { readMonitorsDB("$ENV{SHARE_PATH}/ldetect-lst/MonitorsDB"); if ($monitor->{EISA_ID}) { - if (my ($mon) = grep { $_->{eisa} eq $monitor->{EISA_ID} } values %monitors) { + if (my ($mon) = grep { lc($_->{eisa}) eq $monitor->{EISA_ID} } values %monitors) { add2hash($monitor, $mon); return $monitor; } |