diff options
| author | Mystery Man <unknown@mandriva.org> | 2002-07-09 13:18:50 +0000 |
|---|---|---|
| committer | Mystery Man <unknown@mandriva.org> | 2002-07-09 13:18:50 +0000 |
| commit | b6c80998f798afb98c5ebb42441c25668b31c93e (patch) | |
| tree | 0a40adbce78a1b7ddee1ba637215ca857ffcae19 /perl-install/install_steps_stdio.pm | |
| parent | a6a904a31e39b74144c53f0cc4086d496b70c09a (diff) | |
| download | drakx-backup-do-not-use-1_1_8_4mdk.tar drakx-backup-do-not-use-1_1_8_4mdk.tar.gz drakx-backup-do-not-use-1_1_8_4mdk.tar.bz2 drakx-backup-do-not-use-1_1_8_4mdk.tar.xz drakx-backup-do-not-use-1_1_8_4mdk.zip | |
This commit was manufactured by cvs2svn to create tag 'V1_1_8_4mdk'.V1_1_8_4mdk
Diffstat (limited to 'perl-install/install_steps_stdio.pm')
| -rw-r--r-- | perl-install/install_steps_stdio.pm | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/perl-install/install_steps_stdio.pm b/perl-install/install_steps_stdio.pm deleted file mode 100644 index 518640d29..000000000 --- a/perl-install/install_steps_stdio.pm +++ /dev/null @@ -1,40 +0,0 @@ -package install_steps_stdio; # $Id$ - -use diagnostics; -use strict; -use vars qw(@ISA); - -@ISA = qw(install_steps_interactive interactive_stdio); - -use common; -use interactive_stdio; -use install_steps_interactive; -use lang; - -sub new($$) { - my ($type, $o) = @_; - - (bless {}, ref $type || $type)->SUPER::new($o); -} - -sub enteringStep { - my ($o, $step) = @_; - print _("Entering step `%s'\n", translate($o->{steps}{$step}{text})); - $o->SUPER::enteringStep($step); -} -sub leavingStep { - my ($o, $step) = @_; - $o->SUPER::leavingStep($step); - print "--------\n"; -} - -#-###################################################################################### -#- Steps Functions -#-###################################################################################### -sub selectLanguage { - my ($o, $first_time) = @_; - $o->SUPER::selectLanguage($first_time); - lang::load_console_font($o->{lang}); -} - -1; |
