From cabec45b66bf300e72243d842d7c5267bdbf6b23 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 18 Dec 2002 15:23:34 +0000 Subject: enumerate the various required packages when requiring a package dynamically known --- perl-install/partition_table.pm | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'perl-install/partition_table.pm') diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm index c6effc3ec..39a164575 100644 --- a/perl-install/partition_table.pm +++ b/perl-install/partition_table.pm @@ -464,6 +464,13 @@ sub read_one($$) { foreach ('empty', @parttype, 'lvm_PV', 'unknown') { /unknown/ and die "unknown partition table format on disk " . $hd->{file}; eval { + # perl_checker: require partition_table::bsd + # perl_checker: require partition_table::dos + # perl_checker: require partition_table::empty + # perl_checker: require partition_table::gpt + # perl_checker: require partition_table::lvm_PV + # perl_checker: require partition_table::mac + # perl_checker: require partition_table::sun require "partition_table/$_.pm"; bless $hd, "partition_table::$_"; ($pt, $info) = $hd->read($sector); -- cgit v1.2.1