diff options
Diffstat (limited to 'perl-install/install_steps_auto_install.pm')
| -rw-r--r-- | perl-install/install_steps_auto_install.pm | 43 |
1 files changed, 0 insertions, 43 deletions
diff --git a/perl-install/install_steps_auto_install.pm b/perl-install/install_steps_auto_install.pm deleted file mode 100644 index a48154aea..000000000 --- a/perl-install/install_steps_auto_install.pm +++ /dev/null @@ -1,43 +0,0 @@ -package install_steps_auto_install; - -use diagnostics; -use strict; -use vars qw(@ISA); - -@ISA = qw(install_steps); - -#-###################################################################################### -#- misc imports -#-###################################################################################### -use common qw(:common); -use install_steps; -use log; - -sub enteringStep($$$) { - my ($o, $step) = @_; - print _("Entering step `%s'\n", translate($o->{steps}{$step}{text})); - $o->SUPER::enteringStep($step); -} - -sub ask_warn { - log::l(ref $_[1] ? join " ", @{$_[1]} : $_[1]); -} - -sub errorInStep { - print "error :(\n"; - print "switch to console f2 for a shell\n"; - print "Press <Enter> to reboot\n"; - <STDIN>; - c::_exit(0); -} - -sub exitInstall { - my ($o) = @_; - return if $o->{autoExitInstall}; - - print "Auto installation complete\n"; - print "Press <Enter> to reboot\n"; - <STDIN>; -} - -1; |
