From eaf48b8f1c12e95d9931671298569b8941eecf74 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 21 Nov 2005 09:25:41 +0000
Subject: fix catching fs::dmraid::init() failure

---
 perl-install/fsedit.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm
index 90f277791..0e6c02fe4 100644
--- a/perl-install/fsedit.pm
+++ b/perl-install/fsedit.pm
@@ -106,7 +106,7 @@ sub handle_dmraid {
     devices::make($_->{device}) foreach @$drives;
 
     require fs::dmraid; 
-    fs::dmraid::init() or log::l("dmraid::init failed"), return;
+    eval { fs::dmraid::init() } or log::l("dmraid::init failed"), return;
 
     my @vgs = fs::dmraid::vgs();
     log::l(sprintf('dmraid: ' . join(' ', map { "$_->{device} [" . join(' ', @{$_->{disks}}) . "]" } @vgs)));
-- 
cgit v1.2.1