summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-08-09 03:34:27 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-08-09 03:34:27 +0000
commite7e3543708edb4a12e0bc744c06420344522eea4 (patch)
tree2b8f633c767cfc38f83619a32d506fff6db80e9d /perl-install/install_steps.pm
parent01988a82b1ebfa676cc48c277156954d4f568507 (diff)
downloaddrakx-e7e3543708edb4a12e0bc744c06420344522eea4.tar
drakx-e7e3543708edb4a12e0bc744c06420344522eea4.tar.gz
drakx-e7e3543708edb4a12e0bc744c06420344522eea4.tar.bz2
drakx-e7e3543708edb4a12e0bc744c06420344522eea4.tar.xz
drakx-e7e3543708edb4a12e0bc744c06420344522eea4.zip
correctly call errorInStep()
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index c07613a9d..f0d540d7e 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -86,8 +86,9 @@ Continue at your own risk."), formatError($@) ]) if $@;
}
sub errorInStep {
- my ($_o, $_err) = @_;
+ my ($_o, $err) = @_;
print "error :(\n";
+ print "$err\n\n";
c::_exit(1);
}
sub kill_action {}