summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/lvm.pm7
1 files changed, 4 insertions, 3 deletions
diff --git a/perl-install/lvm.pm b/perl-install/lvm.pm
index fae0a8c6b..8207b80f9 100644
--- a/perl-install/lvm.pm
+++ b/perl-install/lvm.pm
@@ -28,20 +28,21 @@ sub cylinder_size {
$hd->{extent_size};
}
-init();
+init() or log::l("lvm::init failed");
sub init() {
eval { modules::load('dm-mod') };
devices::make('urandom');
my $control = '/dev/mapper/control';
if (! -e $control) {
- my ($major) = cat_('/proc/devices') =~ /(\d+) misc$/m or die "device-mapper error";
- my ($minor) = cat_('/proc/misc') =~ /(\d+) device-mapper$/m or die "device-mapper error";
+ my ($major) = cat_('/proc/devices') =~ /(\d+) misc$/m or return;
+ my ($minor) = cat_('/proc/misc') =~ /(\d+) device-mapper$/m or return;
mkdir_p(dirname($control));
syscall_('mknod', $control, c::S_IFCHR() | 0600, makedev($major, $minor)) or die "mknod $control failed: $!";
}
run_program::run('lvm2', 'vgscan') if !-e '/etc/lvmtab';
run_program::run('lvm2', 'vgchange', '-a', 'y');
+ 1;
}
sub lvm_cmd {