diff options
Diffstat (limited to 'perl-install/lang.pm')
| -rw-r--r-- | perl-install/lang.pm | 7 |
1 files changed, 5 insertions, 2 deletions
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}; } |