From 0b690781203ed2113d85e5a53c4d260847c25387 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 3 Sep 2003 16:04:49 +0000
Subject: - move call to ->charsetChanged from install_steps_interactive to
 install_steps   so that we can use it in
 install_steps_auto_install_non_interactive - don't overload ->selectLanguage
 to call lang::load_console_font(), overload ->charsetChanged instead

---
 perl-install/install_steps_newt.pm | 15 +++++----------
 1 file changed, 5 insertions(+), 10 deletions(-)

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

diff --git a/perl-install/install_steps_newt.pm b/perl-install/install_steps_newt.pm
index 36c6ec8cf..2b01dc82c 100644
--- a/perl-install/install_steps_newt.pm
+++ b/perl-install/install_steps_newt.pm
@@ -35,6 +35,11 @@ sub new {
     (bless {}, ref($type) || $type)->SUPER::new($o);
 }
 
+sub charsetChanged {
+    my ($o) = @_;
+    lang::load_console_font($o->{locale});
+}
+
 sub enteringStep {
     my ($o, $step) = @_;
     $o->SUPER::enteringStep($step);
@@ -46,15 +51,5 @@ sub exitInstall {
     interactive::newt::end();
 }
 
-#-######################################################################################
-#- Steps Functions
-#-######################################################################################
-sub selectLanguage {
-    my ($o) = @_;
-    $o->SUPER::selectLanguage;
-    lang::load_console_font($o->{locale});
-}
-
-
 1;
 
-- 
cgit v1.2.1