summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/lvm.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/lvm.pm b/perl-install/lvm.pm
index 4499b9a1f..6f9ac2a20 100644
--- a/perl-install/lvm.pm
+++ b/perl-install/lvm.pm
@@ -136,6 +136,7 @@ sub suggest_lv_name {
sub lv_create {
my ($lvm, $lv) = @_;
+ suggest_lv_name($lvm, $lv);
$lv->{device} = "$lvm->{VG_name}/$lv->{lv_name}";
lvm_cmd_or_die('lvcreate', '--size', int($lv->{size} / 2) . 'k', '-n', $lv->{lv_name}, $lvm->{VG_name});
$lv->{size} = get_lv_size($lv->{device}); #- the created size is smaller than asked size