From 18fb55671bbe54db5316e309b88fbbe9b9cf2a95 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 25 Mar 2000 21:49:26 +0000 Subject: no_comment --- 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 8e31ed4af..a65bdb29c 100644 --- a/perl-install/Xconfig.pm +++ b/perl-install/Xconfig.pm @@ -44,7 +44,6 @@ sub getinfoFromXF86Config { open F, "$prefix/etc/X11/XF86Config" or return {}; foreach () { if (/^Section "Keyboard"/ .. /^EndSection/) { - $o->{keyboard}{altmeta} ||= ($1 eq "ModeShift" ? 1 : 0) if /^\s*RightAlt\s+"(.*?)"/; $o->{keyboard}{xkb_keymap} ||= $1 if /^\s*XkbLayout\s+"(.*?)"/; } elsif (/^Section "Pointer"/ .. /^EndSection/) { $o->{mouse}{XMOUSETYPE} ||= $1 if /^\s*Protocol\s+"(.*?)"/; @@ -60,6 +59,7 @@ 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{driver} ||= $1 if /^\s*Driver\s+"(.*?)"/; $c{options}{$1} ||= 1 if /^\s*Option\s+"(.*?)"/; $c{options}{$1} ||= 0 if /^\s*#\s*Option\s+"(.*?)"/; -- cgit v1.2.1