summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_newt.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-09-03 16:04:49 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-09-03 16:04:49 +0000
commit0b690781203ed2113d85e5a53c4d260847c25387 (patch)
tree73eefce0c3865730d9bd5f31d52928ce5dadf25e /perl-install/install_steps_newt.pm
parent2602c854c769e2b70bdf18579f6348b0496bc09f (diff)
downloaddrakx-0b690781203ed2113d85e5a53c4d260847c25387.tar
drakx-0b690781203ed2113d85e5a53c4d260847c25387.tar.gz
drakx-0b690781203ed2113d85e5a53c4d260847c25387.tar.bz2
drakx-0b690781203ed2113d85e5a53c4d260847c25387.tar.xz
drakx-0b690781203ed2113d85e5a53c4d260847c25387.zip
- 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
Diffstat (limited to 'perl-install/install_steps_newt.pm')
-rw-r--r--perl-install/install_steps_newt.pm15
1 files changed, 5 insertions, 10 deletions
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;