From 5ad28ed89436c62bc3f7e995e95f71e10afd8326 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 18 Sep 2007 14:10:29 +0000
Subject: it's better to inheritate from partition_table::readonly, that way we
 can do ->isa('partition_table::lvm')

---
 perl-install/partition_table/lvm.pm | 13 +++++++++----
 1 file changed, 9 insertions(+), 4 deletions(-)

(limited to 'perl-install/partition_table/lvm.pm')

diff --git a/perl-install/partition_table/lvm.pm b/perl-install/partition_table/lvm.pm
index e82d026e1..5378d0bb2 100644
--- a/perl-install/partition_table/lvm.pm
+++ b/perl-install/partition_table/lvm.pm
@@ -5,9 +5,10 @@ package partition_table::lvm; # $Id: $
 use diagnostics;
 use strict;
 
-1;
+our @ISA = qw(partition_table::readonly);
 
 use common;
+use partition_table::readonly;
 use fs::type;
 use lvm;
 
@@ -28,8 +29,12 @@ sub read_primary {
 
     $type && $type->{pt_type} == $wanted->{pt_type} or return;
 
-    require partition_table::readonly;
-    partition_table::readonly->initialize($hd, _parts($hd));
-
+    partition_table::lvm->initialize($hd);
     1;
 }
+
+sub initialize {
+    my ($class, $hd) = @_;
+
+    partition_table::readonly::initialize($class, $hd, _parts($hd));    
+}
-- 
cgit v1.2.1