From ea9af9cf83abfccc10de6279491cb3190ec158fe Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 21 Jan 2003 13:52:04 +0000 Subject: have Xfree version at only one place (nb: it would be better to parse available package and get version from it.) --- perl-install/Xconfig/various.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/Xconfig/various.pm') diff --git a/perl-install/Xconfig/various.pm b/perl-install/Xconfig/various.pm index 12d23f0b3..ae74020fb 100644 --- a/perl-install/Xconfig/various.pm +++ b/perl-install/Xconfig/various.pm @@ -12,7 +12,7 @@ use common; sub info { my ($raw_X, $card) = @_; my $info; - my $xf_ver = Xconfig::card::using_xf4($card) ? "4.2.1" : "3.3.6"; + my $xf_ver = Xconfig::card::using_xf4($card) ? Xconfig::card::xfree4_version() : Xconfig::card::xfree3_version(); my $title = $card->{use_DRI_GLX} || $card->{use_UTAH_GLX} ? N("XFree %s with 3D hardware acceleration", $xf_ver) : N("XFree %s", $xf_ver); my $keyboard = eval { $raw_X->get_keyboard } || {}; -- cgit v1.2.1