From 7c6fdae5a9d288c21afd35588b693bac1a2c8006 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Mon, 24 Nov 2003 10:22:30 +0000
Subject: thx perl_checko

---
 perl-install/keyboard.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/keyboard.pm b/perl-install/keyboard.pm
index 672384eb7..121d1cf8e 100644
--- a/perl-install/keyboard.pm
+++ b/perl-install/keyboard.pm
@@ -476,7 +476,7 @@ sub setup {
     } elsif (-e (my $f = "$ENV{SHARE_PATH}/keymaps/$kmap.bkmap")) {
 	load(scalar cat_($f));
     } else {
-	my $kid = run_program::bg_command(sub {
+	my $kid = bg_command->new(sub {
 	    eval {
 		require packdrake;
 		my $packer = new packdrake("$ENV{SHARE_PATH}/keymaps.cz2", quiet => 1);
-- 
cgit v1.2.1