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_("Mandrake 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(''); #-PO This string must fit in a 80-char wide text screen Newt::PushHelpLine(N(" / between elements | selects | next screen ")); (bless {}, ref($type) || $type)->SUPER::new($o); } sub enteringStep { my ($o, $step) = @_; $o->SUPER::enteringStep($step); banner(translate($o->{steps}{$step}{text})); } sub exitInstall { &install_steps_interactive::exitInstall; interactive::newt::end(); } #-###################################################################################### #- Steps Functions #-###################################################################################### sub selectLanguage { my ($o) = @_; $o->SUPER::selectLanguage; lang::load_console_font($o->{locale}); } 1; /td>
diff options
context:
space:
mode:
authorfilip <filip.komar@gmail.com>2019-07-04 01:01:32 +0200
committerfilip <filip.komar@gmail.com>2019-07-04 01:01:32 +0200
commitf8369d1a7a69a82371f57c46f3ff8ba5fb3e6dea (patch)
treebd8a97653647a4a9b0dce00c9a97a030ee5cef50
parentfe90cd69aa1b219648c0ef983506f332a8649869 (diff)
downloadgeneral-f8369d1a7a69a82371f57c46f3ff8ba5fb3e6dea.tar
general-f8369d1a7a69a82371f57c46f3ff8ba5fb3e6dea.tar.gz
general-f8369d1a7a69a82371f57c46f3ff8ba5fb3e6dea.tar.bz2
general-f8369d1a7a69a82371f57c46f3ff8ba5fb3e6dea.tar.xz
general-f8369d1a7a69a82371f57c46f3ff8ba5fb3e6dea.zip
adding and updating NetInstall pdf manual for release 7