summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS2
-rw-r--r--perl-install/lvm.pm12
2 files changed, 10 insertions, 4 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 3a053723d..0921d7fec 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,3 +1,5 @@
+- bootloader-config:
+ o fix root=xxx parameter for "/" on lvm using UUID= in fstab (#36542)
- adapt to perl 5.10.0
Version 10.6.5 - 14 January 2008
diff --git a/perl-install/lvm.pm b/perl-install/lvm.pm
index 3bc670bad..f33b22522 100644
--- a/perl-install/lvm.pm
+++ b/perl-install/lvm.pm
@@ -111,13 +111,17 @@ sub get_lvs {
[
map {
my $device = "$lvm->{VG_name}/$_";
- my $fs_type = -e "/dev/$device" && fs::type::fs_type_from_magic({ device => $device });
-
- { device => $device,
+ my $part = {
+ device => $device,
lv_name => $_,
rootDevice => $lvm->{VG_name},
- fs_type => $fs_type || 'ext2',
size => get_lv_size($device) };
+ if (my $type = -e "/dev/$device" && fs::type::type_subpart_from_magic($part)) {
+ put_in_hash($part, $type);
+ } else {
+ $part->{fs_type} = 'ext2';
+ }
+ $part;
} @l
];
}