diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-08-09 03:34:27 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-08-09 03:34:27 +0000 |
commit | e7e3543708edb4a12e0bc744c06420344522eea4 (patch) | |
tree | 2b8f633c767cfc38f83619a32d506fff6db80e9d /perl-install/install_steps.pm | |
parent | 01988a82b1ebfa676cc48c277156954d4f568507 (diff) | |
download | drakx-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.pm | 3 |
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 {} |