From d004436dc848800c9d65b90e39c39836c4d44cdf Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 1 Jan 2000 17:09:26 +0000 Subject: no_comment --- perl-install/lang.pm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'perl-install/lang.pm') diff --git a/perl-install/lang.pm b/perl-install/lang.pm index 2e3a30b28..7bbcde393 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -1,4 +1,4 @@ - package lang; +package lang; use diagnostics; use strict; @@ -237,11 +237,14 @@ sub write { add2hash $h, { SYSFONT => $c->[0], UNIMAP => $c->[1], SYSFONTACM => $c->[2] }; my $p = "$prefix/usr/lib/kbd"; - commands::cp("-f", + eval { + commands::cp("-f", "$p/consolefonts/$c->[0].psf.gz", glob_("$p/consoletrans/$c->[1]*"), glob_("$p/consoletrans/$c->[2]*"), "$prefix/etc/sysconfig/console"); + }; + $@ and log::l("missing console $c->[0], $c->[1], $c->[2]"); } add2hash $h, $xim{$lang}; } -- cgit v1.2.1