diff options
Diffstat (limited to 'perl-install/Xconfigurator.pm')
-rw-r--r-- | perl-install/Xconfigurator.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index 892b1f1c0..956f8695a 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -83,12 +83,12 @@ sub readCardsDB { \%cards; } sub readCardsNames { - my $file = "$prefix/usr/X11R6/lib/X11/CardsNames"; + my $file = "/usr/X11R6/lib/X11/CardsNames"; local *F; open F, $file or die "can't find $file\n"; map { (split '=>')[0] } <F>; } sub cardName2RealName { - my $file = "$prefix/usr/X11R6/lib/X11/CardsNames"; + my $file = "/usr/X11R6/lib/X11/CardsNames"; my ($name) = @_; local *F; open F, $file or die "can't find $file\n"; foreach (<F>) { chop; |