From ec329cc4150b3db24c196c46b5e84d38a3a98259 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 3 Dec 2007 16:41:16 +0000
Subject: - don't check /proc/partitions for a partition_table::lvm   (ie PV on
 non partitioned drive)

---
 perl-install/fs/proc_partitions.pm | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'perl-install/fs')

diff --git a/perl-install/fs/proc_partitions.pm b/perl-install/fs/proc_partitions.pm
index c0fc8efc4..566f9ee70 100644
--- a/perl-install/fs/proc_partitions.pm
+++ b/perl-install/fs/proc_partitions.pm
@@ -46,6 +46,9 @@ sub read {
 sub compare {
     my ($hd) = @_;
 
+    eval { $hd->isa('partition_table::lvm') } and return;
+
+
     my @l1 = partition_table::get_normal_parts($hd);
     my @l2 = grep { $_->{rootDevice} eq $hd->{device} } &read([$hd]);
 
-- 
cgit v1.2.1