From 011cd29962ce3251d3d2816334a62846b5554ce6 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Thu, 10 Feb 2000 18:59:34 +0000 Subject: *** empty log message *** --- perl-install/keyboard.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/keyboard.pm') diff --git a/perl-install/keyboard.pm b/perl-install/keyboard.pm index ff0468fec..57da2fe96 100644 --- a/perl-install/keyboard.pm +++ b/perl-install/keyboard.pm @@ -203,7 +203,7 @@ sub xmodmap_file { my ($keyboard) = @_; my $f = "/usr/share/xmodmap/xmodmap.$keyboard"; if (! -e $f) { - run_program::run("extract_archive", "/usr/share/xmodmap", '/tmp', "xmodmap.$keyboard"); + run_program::run("extract_archive", "/usr/share/xmodmap.cz2", '/tmp', "xmodmap.$keyboard"); $f = "/tmp/xmodmap.$keyboard"; } $f; @@ -218,7 +218,7 @@ sub setup($) { load(cat_($f)); } else { local *F; - open F, "extract_archive /usr/share/keymaps '' $o->[1].kmap |"; + open F, "extract_archive /usr/share/keymaps.cz2 '' $o->[1].kmap |"; local $/ = undef; eval { load() }; } -- cgit v1.2.1