From b231c038ef2bcba38afdf550682d691af63ce094 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 11 Aug 2003 15:12:54 +0000 Subject: fix typo (fix bug #4239) --- perl-install/lvm.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/lvm.pm') diff --git a/perl-install/lvm.pm b/perl-install/lvm.pm index 9b9ce8d58..00cf7a27b 100644 --- a/perl-install/lvm.pm +++ b/perl-install/lvm.pm @@ -129,7 +129,7 @@ sub lv_create { my ($lvm, $lv) = @_; my $list = $lvm->{primary}{normal} ||= []; $lv->{lv_name} ||= 1 + max(map { if_($_->{device} =~ /(\d+)$/, $1) } @$list); - $lv->{device} = "$lvm->{VG_name}/$lvm->{lv_name}"; + $lv->{device} = "$lvm->{VG_name}/$lv->{lv_name}"; run_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 $lv->{notFormatted} = 1; -- cgit v1.2.1