From 8ff4715da6d0e9fb1929b1fe6e11258b1573d4d0 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 20 Jul 2002 21:44:19 +0000 Subject: (getinfoFromXF86Config): move here setting prefer_xf3 based on current choice on system --- perl-install/Xconfig.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/perl-install/Xconfig.pm b/perl-install/Xconfig.pm index 5cc32d47f..d34edff2e 100644 --- a/perl-install/Xconfig.pm +++ b/perl-install/Xconfig.pm @@ -64,6 +64,9 @@ sub getinfoFromXF86Config { my ($X, $prefix) = @_; #- original $::o->{X} which must be changed only if sure! $X ||= {}; + #- don't keep the preference on upgrades?? + $card->{prefer_xf3} = readlink("$::prefix/etc/X11/X") =~ /XF86_/ if $::isStandalone; + my (%keyboard, %mouse, %wacom, %card, %monitor); my (%c, $depth); -- cgit v1.2.1