From cfe7ff7eb477051523765ee5f08f513e81357177 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Wed, 17 Nov 1999 14:41:15 +0000 Subject: *** empty log message *** --- perl-install/Xconfig.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'perl-install/Xconfig.pm') diff --git a/perl-install/Xconfig.pm b/perl-install/Xconfig.pm index 67f5d4138..9f2ae364c 100644 --- a/perl-install/Xconfig.pm +++ b/perl-install/Xconfig.pm @@ -61,9 +61,11 @@ sub getinfoFromXF86Config { $c{flags}{needVideoRam} ||= 1 if /^\s*VideoRam\s+/; $c{vendor} ||= $1 if /^\s*VendorName\s+"(.*?)"/; $c{board} ||= $1 if /^\s*BoardName\s+"(.*?)"/; + $c{options}{$1} ||= 1 if /^\s*Option\s+"(.*?)"/; + $c{options}{$1} ||= 0 if /^\s*#\s*Option\s+"(.*?)"/; #- clockchip, ramdac, dacspeed read with following line. - push @{$c{lines}}, $_ unless /(Section|Identifier|VideoRam|VendorName|BoardName)/; + push @{$c{lines}}, $_ unless /(Section|Identifier|VideoRam|VendorName|BoardName|Option)/; add2hash($o->{card} ||= {}, \%c) if ($i =~ /E0/ && $c{type} && $c{type} ne "Generic VGA"); } elsif (/^Section "Monitor"/ .. /^EndSection/) { -- cgit v1.2.1