From 69d736180b208aff2f62996e0cf6b01f90bf83eb Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 3 Sep 2001 19:16:15 +0000
Subject: fix for lvm (non-)creation of devices

---
 perl-install/fs.pm | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

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

diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index 8404cdaf4..7c026d26f 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -94,7 +94,10 @@ sub add2all_hds {
 }
 
 sub get_major_minor {
-    (undef, $_->{major}, $_->{minor}) = devices::entry($_->{device}) foreach @_;
+    eval {
+	my (undef, $major, $minor) = devices::entry($_->{device});
+	($_->{major}, $_->{minor}) = ($major, $minor);
+    } foreach @_;
 }
 
 sub merge_info_from_mtab {
@@ -141,7 +144,8 @@ sub write_fstab {
 	      ($_->{mntpoint} eq '/' ? "/initrd/loopfs$_->{loopback_file}" : $_->{device}) :
 	  do {
 	      my $dir = $_->{device} =~ m|^/| ? '' : '/dev/';
-	      devices::make("$prefix$dir$_->{device}"); "$dir$_->{device}";
+	      eval { devices::make("$prefix$dir$_->{device}") };
+	      "$dir$_->{device}";
 	  };
 
 	mkdir("$prefix/$_->{mntpoint}", 0755);
-- 
cgit v1.2.1