From 25365fea641e9e5bcec2372695c9438d099b78eb Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 5 Sep 2000 12:07:44 +0000
Subject: no_comment

---
 perl-install/install_steps_auto_install.pm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'perl-install/install_steps_auto_install.pm')

diff --git a/perl-install/install_steps_auto_install.pm b/perl-install/install_steps_auto_install.pm
index 4b585f7e6..0ff5743b5 100644
--- a/perl-install/install_steps_auto_install.pm
+++ b/perl-install/install_steps_auto_install.pm
@@ -14,7 +14,7 @@ use modules;
 #-######################################################################################
 #- misc imports
 #-######################################################################################
-use common qw(:common);
+use common qw(:common :functional);
 use install_steps;
 use log;
 
@@ -70,6 +70,11 @@ sub selectLanguage {
     lang::load_console_font($o->{lang});
 }
 
+sub installPackages {
+    my ($o, $packages) = @_;
+    catch_cdie { $o->install_steps::installPackages($packages) } sub { print "$@\n"; 1 }
+}
+
 sub exitInstall {
     my ($o, $alldone) = @_;
     return if $o->{autoExitInstall};
-- 
cgit v1.2.1