summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm11
1 files changed, 11 insertions, 0 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 779a3bbc4..b64952370 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -22,12 +22,23 @@ my $o;
1;
+sub warn {}
+
sub new($$) {
my ($type, $o_) = @_;
$o = bless $o_, ref $type || $type;
}
+sub enteringStep($$) {
+ my ($o, $step) = @_;
+ log::l("starting step `$step'");
+}
+sub leavingStep($$) {
+ my ($o, $step) = @_;
+ log::l("step `$step' finished");
+}
+
sub chooseLanguage($) {
# eval { run_program::run('loadkeys', "/tmp/$o->{default}->{lang}) }; $@ and log::l("loadkeys failed");
$o->{default}->{lang};