From 0f4038fd09f9f8582f1a868584d8cac54df640eb Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 9 Oct 2001 11:17:08 +0000 Subject: make perl_checker happy --- perl-install/partition_table.pm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'perl-install/partition_table.pm') diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm index d16d0ccd8..f0485dee3 100644 --- a/perl-install/partition_table.pm +++ b/perl-install/partition_table.pm @@ -1,8 +1,8 @@ package partition_table; # $Id$ -#use diagnostics; -#use strict; -#use vars qw(@ISA %EXPORT_TAGS @EXPORT_OK @important_types @important_types2 @fields2save); +use diagnostics; +use strict; +use vars qw(@ISA %EXPORT_TAGS @EXPORT_OK @important_types @important_types2 @fields2save @bad_types); @ISA = qw(Exporter); %EXPORT_TAGS = ( @@ -13,6 +13,7 @@ package partition_table; # $Id$ use common; use partition_table_raw; +use detect_devices; use log; @important_types = ('Linux native', 'Linux swap', -- cgit v1.2.1