From a6b43960c290efc3df6e49b4fe2fcaeace5bd7c9 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 2 Aug 2007 20:42:29 +0000
Subject: - restore consoletrans handling and adapt it to kbd - find a working
 font for iso-8859-7 (greek)

---
 perl-install/install/steps_auto_install.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/install')

diff --git a/perl-install/install/steps_auto_install.pm b/perl-install/install/steps_auto_install.pm
index debff44e0..f6b556a9d 100644
--- a/perl-install/install/steps_auto_install.pm
+++ b/perl-install/install/steps_auto_install.pm
@@ -106,9 +106,9 @@ sub charsetChanged {
     my ($o) = @_;
     lang::load_console_font($o->{locale});
 
-    my ($name, $_sfm) = lang::l2console_font($o->{locale});
+    my ($name, $acm) = lang::l2console_font($o->{locale}, 1);
     my %fs_options = lang::fs_options($o->{locale});
-    $iocharset = $name && $fs_options{iocharset} ne 'utf8' ? $fs_options{iocharset} : '';
+    $iocharset = $name && $acm && $fs_options{iocharset} ne 'utf8' ? $fs_options{iocharset} : '';
 }
 
 sub errorInStep {
-- 
cgit v1.2.1