summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_stdio.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_stdio.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_stdio.pm')
-rw-r--r--perl-install/install_steps_stdio.pm14
1 files changed, 5 insertions, 9 deletions
diff --git a/perl-install/install_steps_stdio.pm b/perl-install/install_steps_stdio.pm
index 223c2f2b5..ac9408b3c 100644
--- a/perl-install/install_steps_stdio.pm
+++ b/perl-install/install_steps_stdio.pm
@@ -17,6 +17,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) = @_;
print N("Entering step `%s'\n", translate($o->{steps}{$step}{text}));
@@ -28,13 +33,4 @@ sub leavingStep {
print "--------\n";
}
-#-######################################################################################
-#- Steps Functions
-#-######################################################################################
-sub selectLanguage {
- my ($o, $first_time) = @_;
- $o->SUPER::selectLanguage($first_time);
- lang::load_console_font($o->{locale});
-}
-
1;