From e7e3543708edb4a12e0bc744c06420344522eea4 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 9 Aug 2004 03:34:27 +0000 Subject: correctly call errorInStep() --- perl-install/install_steps.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/install_steps.pm') 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 {} -- cgit v1.2.1