From aa912d0daeaa6d4d84addfd2fc0ebba11e137edd Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 29 Oct 1999 03:06:22 +0000
Subject: no_comment

---
 perl-install/keyboard.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'perl-install/keyboard.pm')

diff --git a/perl-install/keyboard.pm b/perl-install/keyboard.pm
index ffa6d9ff4..fd296ef0f 100644
--- a/perl-install/keyboard.pm
+++ b/perl-install/keyboard.pm
@@ -9,7 +9,7 @@ use strict;
 #-######################################################################################
 use common qw(:common :system :file);
 use run_program;
-use install_any;
+use commands;
 use log;
 use c;
 
@@ -141,11 +141,11 @@ sub setup($) {
     my ($keyboard) = @_;
     my $o = $keyboards{$keyboard} or return;
 
-    if (my $file = install_any::install_cpio("/usr/share/keymaps", "$o->[1].kmap")) {
+    if (my $file = commands::install_cpio("/usr/share/keymaps", "$o->[1].kmap")) {
 	log::l("loading keymap $o->[1]");
 	load(cat_($file)) if -e $file;
     }
-    if (my $file = install_any::install_cpio("/usr/share/xmodmap", "xmodmap.$keyboard")) {
+    if (my $file = commands::install_cpio("/usr/share/xmodmap", "xmodmap.$keyboard")) {
 	eval { run_program::run('xmodmap', $file) } unless $::testing;
     }
 }
-- 
cgit v1.2.1