diff options
| -rw-r--r-- | perl-install/partition_table.pm | 7 | ||||
| -rw-r--r-- | perl-install/partition_table_raw.pm | 1 |
2 files changed, 5 insertions, 3 deletions
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', diff --git a/perl-install/partition_table_raw.pm b/perl-install/partition_table_raw.pm index 7fc27c31c..bbeaaa5ad 100644 --- a/perl-install/partition_table_raw.pm +++ b/perl-install/partition_table_raw.pm @@ -5,6 +5,7 @@ use strict; use common; use devices; +use detect_devices; use log; use c; |