diff options
-rw-r--r-- | perl-install/Xconfig/card.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/Xconfig/card.pm b/perl-install/Xconfig/card.pm index a2474e035..694c30e62 100644 --- a/perl-install/Xconfig/card.pm +++ b/perl-install/Xconfig/card.pm @@ -84,8 +84,8 @@ sub from_raw_X { my ($xfree3_server) = readlink("$::prefix/etc/X11/X") =~ /XF86_(.*)/; my $card = { - use_UTAH_GLX => any { /glx/ } $raw_X->{xfree3}->get_modules, - use_DRI_GLX => any { /dri/ } $raw_X->{xfree4}->get_modules, + use_UTAH_GLX => (any { /glx/ } $raw_X->{xfree3}->get_modules), + use_DRI_GLX => (any { /dri/ } $raw_X->{xfree4}->get_modules), server => $xfree3_server, prefer_xf3 => $xfree3_server && !$force_xf4, %$device, |