From 4799bc7d0f1e3cabb0396f47ec356b8e478c1b97 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 1 Sep 2000 15:25:57 +0000
Subject: no_comment

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

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

diff --git a/perl-install/keyboard.pm b/perl-install/keyboard.pm
index 7cce0d1ff..70aa0df5f 100644
--- a/perl-install/keyboard.pm
+++ b/perl-install/keyboard.pm
@@ -268,7 +268,7 @@ sub setup {
 	local *F;
 	open F, "packdrake -x $ENV{SHARE_PATH}/keymaps.cz2 '' $o->[1].bkmap |";
 	local $/ = undef;
-	eval { load(scalar <F>) };
+	eval { load(join('', <F>)) };
     }
     my $f = xmodmap_file($keyboard);
     eval { run_program::run('xmodmap', $f) } unless $::testing || !$f;
-- 
cgit v1.2.1