package install_steps_newt; # $Id$ use diagnostics; use strict; use vars qw(@ISA); @ISA = qw(install_steps_interactive interactive::newt); #-###################################################################################### #- misc imports #-###################################################################################### use install_steps_interactive; use interactive::newt; use install_any; use devices; use lang; use common; sub banner { my $banner = translate(N_("Mandriva Linux Installation %s")); my $l = first(Newt::GetScreenSize()) - length($banner) - length($_[0]) + 1; Newt::DrawRootText(0, 0, sprintf($banner, ' ' x $l . $_[0])); Newt::Refresh(); } sub new { my ($type, $o) = @_; interactive::newt->new; banner(''); Newt::PushHelpLine( #-PO: This string must fit in a 80-char wide text screen N(" / between elements | selects | next screen ")); (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); banner(translate($o->{steps}{$step}{text})); } sub exitInstall { &install_steps_interactive::exitInstall; interactive::newt::end(); } 1; ion> Mageia Installer and base platform for many utilitiesThierry Vignaud [tv]
summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFunda Wang <fwang@mandriva.org>2005-03-12 17:55:15 +0000
committerFunda Wang <fwang@mandriva.org>2005-03-12 17:55:15 +0000
commitcdb19c8bc1a8990e0c47984139b3184b402a2897 (patch)
tree9ea510ebed67d6a847848af94277d6a044b94359 /perl-install/share/po
parentca206fa3673c2a546231a50654658b5123b695eb (diff)
downloaddrakx-cdb19c8bc1a8990e0c47984139b3184b402a2897.tar
drakx-cdb19c8bc1a8990e0c47984139b3184b402a2897.tar.gz
drakx-cdb19c8bc1a8990e0c47984139b3184b402a2897.tar.bz2
drakx-cdb19c8bc1a8990e0c47984139b3184b402a2897.tar.xz
drakx-cdb19c8bc1a8990e0c47984139b3184b402a2897.zip
s/Netmask address/Netmask/. typo fix
Diffstat (limited to 'perl-install/share/po')