diff options
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/fsedit.pm | 2 | ||||
-rw-r--r-- | perl-install/lvm.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/fsedit.pm b/perl-install/fsedit.pm index f17d5c151..71522fbff 100644 --- a/perl-install/fsedit.pm +++ b/perl-install/fsedit.pm @@ -84,7 +84,7 @@ sub lvms { my @lvms; foreach (@pvs) { - my $name = lvm::get_vg($_) or next; + my $name = lvm::pv_to_vg($_) or next; my $lvm = find { $_->{VG_name} eq $name } @lvms; if (!$lvm) { $lvm = new lvm($name); diff --git a/perl-install/lvm.pm b/perl-install/lvm.pm index 327fe8177..165caa3ef 100644 --- a/perl-install/lvm.pm +++ b/perl-install/lvm.pm @@ -63,7 +63,7 @@ sub check { 1; } -sub get_vg { +sub pv_to_vg { my ($part) = @_; my $dev = expand_symlinks(devices::make($part->{device})); run_program::get_stdout('lvm2', 'pvs', '--noheadings', '-o', 'vg_name', $dev) =~ /(\S+)/ && $1; |