summaryrefslogtreecommitdiffstats
path: root/perl-install/install_gtk.pm
diff options
context:
space:
mode:
authorMystery Man <unknown@mandriva.org>2003-02-25 09:37:46 +0000
committerMystery Man <unknown@mandriva.org>2003-02-25 09:37:46 +0000
commit07dc2ddb40089c216ab4ff323de177ecab8f02ef (patch)
tree0b88fcba964e83b283b89aab8740fc3cdcd0d939 /perl-install/install_gtk.pm
parent327bd24f8e4291bd1882de1990dd7339f781a9cb (diff)
downloaddrakx-backup-do-not-use-07dc2ddb40089c216ab4ff323de177ecab8f02ef.tar
drakx-backup-do-not-use-07dc2ddb40089c216ab4ff323de177ecab8f02ef.tar.gz
drakx-backup-do-not-use-07dc2ddb40089c216ab4ff323de177ecab8f02ef.tar.bz2
drakx-backup-do-not-use-07dc2ddb40089c216ab4ff323de177ecab8f02ef.tar.xz
drakx-backup-do-not-use-07dc2ddb40089c216ab4ff323de177ecab8f02ef.zip
This commit was manufactured by cvs2svn to create branch
'R9_0-64bit-branch'.
Diffstat (limited to 'perl-install/install_gtk.pm')
-rw-r--r--perl-install/install_gtk.pm8
1 files changed, 5 insertions, 3 deletions
diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm
index 89517dffb..0bd4afcba 100644
--- a/perl-install/install_gtk.pm
+++ b/perl-install/install_gtk.pm
@@ -7,6 +7,7 @@ use my_gtk qw(:helpers :wrappers);
use common;
use lang;
use devices;
+use log;
#-#####################################################################################
#-INTERN CONSTANT
@@ -198,11 +199,12 @@ sub createXconf {
symlink("/tmp/stage2/etc/imrc", "/etc/imrc");
symlink("/tmp/stage2/etc/im_palette.pal", "etc/im_palette.pal");
-if (arch() =~ /^ia64/) {
+if (arch() =~ /^ia64|x86_64/) {
require Xconfig::card;
my ($card) = Xconfig::card::probe();
- Xconfig::card::add_to_card__using_Cards($card, $card->{type}) if $card && $card->{type};
- output($file, sprintf(<<'END', $mouse_type, $card->{driver}));
+ Xconfig::card::add_to_card__using_Cards($card, $card->{BoardName}) if $card && $card->{BoardName};
+ log::l("Mouse type is $mouse_type and Card driver is " . $card->{Driver});
+ output($file, sprintf(<<'END', $mouse_type, $card->{Driver}));
Section "Files"
FontPath "/usr/X11R6/lib/X11/fonts:unscaled"