summaryrefslogtreecommitdiffstats
path: root/perl-install/partition_table.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-07-23 11:08:35 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-07-23 11:08:35 +0000
commit61b0cd36577df2a9f86cb2c08d14737f0bbcb557 (patch)
tree08dfd2ab02af6b7c7410158a531a95c2db7b3350 /perl-install/partition_table.pm
parent6ed6b5341362f87e3c70420f206a33f71c72a3de (diff)
downloaddrakx-61b0cd36577df2a9f86cb2c08d14737f0bbcb557.tar
drakx-61b0cd36577df2a9f86cb2c08d14737f0bbcb557.tar.gz
drakx-61b0cd36577df2a9f86cb2c08d14737f0bbcb557.tar.bz2
drakx-61b0cd36577df2a9f86cb2c08d14737f0bbcb557.tar.xz
drakx-61b0cd36577df2a9f86cb2c08d14737f0bbcb557.zip
g Move 2: partition table: hierarchy
Diffstat (limited to 'perl-install/partition_table.pm')
-rw-r--r--perl-install/partition_table.pm10
1 files changed, 5 insertions, 5 deletions
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm
index 0c1fd482c..7452a70cb 100644
--- a/perl-install/partition_table.pm
+++ b/perl-install/partition_table.pm
@@ -12,7 +12,7 @@ use vars qw(@ISA %EXPORT_TAGS @EXPORT_OK @important_types @important_types2 @fie
use common;
-use partition_table_raw;
+use partition_table::raw;
use detect_devices;
use log;
@@ -462,8 +462,8 @@ sub read_one($$) {
foreach ('empty', @parttype, 'lvm_PV', 'unknown') {
/unknown/ and die "unknown partition table format on disk " . $hd->{file};
eval {
- require("partition_table_$_.pm");
- bless $hd, "partition_table_$_";
+ require("partition_table/$_.pm");
+ bless $hd, "partition_table::$_";
($pt, $info) = $hd->read($sector);
log::l("found a $_ partition table on $hd->{file} at sector $sector");
};
@@ -486,7 +486,7 @@ sub read_one($$) {
sub read($;$) {
my ($hd, $clearall) = @_;
if ($clearall) {
- partition_table_raw::zero_MBR_and_dirty($hd);
+ partition_table::raw::zero_MBR_and_dirty($hd);
return 1;
}
my $pt = read_one($hd, 0) or return 0;
@@ -584,7 +584,7 @@ sub write {
if ($hd->{needKernelReread} && ref($hd->{needKernelReread}) eq 'ARRAY' && $::isStandalone) {
#- we've only been adding partitions. Try special add_partition (using BLKPG_ADD_PARTITION)
local *F;
- partition_table_raw::openit($hd, *F) or goto force_reread;
+ partition_table::raw::openit($hd, *F) or goto force_reread;
foreach (@{$hd->{needKernelReread}}) {
c::add_partition(fileno F, $_->{start}, $_->{size}, $_->{device} =~ /(\d+)$/)