summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2013-04-05 13:33:20 +0000
committerThierry Vignaud <tv@mageia.org>2013-04-05 13:33:20 +0000
commitddab495169e8bfbedea55b315667f978fbb0f4e0 (patch)
treee46c4fa12963bb2e9b3b3d72f7e0de6fa5275d97 /perl-install
parent6674272ed9caa21c2cc8a76e15a4b2dc973f2f9f (diff)
downloaddrakx-backup-do-not-use-ddab495169e8bfbedea55b315667f978fbb0f4e0.tar
drakx-backup-do-not-use-ddab495169e8bfbedea55b315667f978fbb0f4e0.tar.gz
drakx-backup-do-not-use-ddab495169e8bfbedea55b315667f978fbb0f4e0.tar.bz2
drakx-backup-do-not-use-ddab495169e8bfbedea55b315667f978fbb0f4e0.tar.xz
drakx-backup-do-not-use-ddab495169e8bfbedea55b315667f978fbb0f4e0.zip
retrieve minor/major for LVs too
thus fixing comparing in fs::get::is_same_hd(): 'device_alias' => 'mapper/vg--mga-root', with: 'device' => 'vg-mga/root', thus fixing removing LVM entries when saving /etc/fstab (mga#5811)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS2
-rw-r--r--perl-install/lvm.pm3
2 files changed, 5 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 324a87498..fb280f6b6 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,5 @@
+- diskdrake:
+ o fix removing LVM entries when saving /etc/fstab (mga#5811)
- drakboot:
o assume grub2.cfg is UTF-8 encoded
o read back xen conf from grub2
diff --git a/perl-install/lvm.pm b/perl-install/lvm.pm
index e2eeb4cdc..5bca97af9 100644
--- a/perl-install/lvm.pm
+++ b/perl-install/lvm.pm
@@ -119,10 +119,13 @@ sub get_lvs {
[
map {
my $device = "$lvm->{VG_name}/$_";
+ my $p = fs::wild_device::to_subpart("/dev/$device");
my $part = {
device => $device,
lv_name => $_,
rootDevice => $lvm->{VG_name},
+ minor => $p->{minor},
+ major => $p->{major},
size => get_lv_size($device) };
if (my $type = -e "/dev/$device" && fs::type::type_subpart_from_magic($part)) {
put_in_hash($part, $type);