diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2002-07-23 11:08:35 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2002-07-23 11:08:35 +0000 |
commit | 61b0cd36577df2a9f86cb2c08d14737f0bbcb557 (patch) | |
tree | 08dfd2ab02af6b7c7410158a531a95c2db7b3350 /perl-install/diskdrake/interactive.pm | |
parent | 6ed6b5341362f87e3c70420f206a33f71c72a3de (diff) | |
download | drakx-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/diskdrake/interactive.pm')
-rw-r--r-- | perl-install/diskdrake/interactive.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm index 0cefc1d05..7a76ff2e8 100644 --- a/perl-install/diskdrake/interactive.pm +++ b/perl-install/diskdrake/interactive.pm @@ -5,7 +5,7 @@ use strict; use common; use partition_table qw(:types); -use partition_table_raw; +use partition_table::raw; use detect_devices; use run_program; use loopback; @@ -274,7 +274,7 @@ sub Clear_all { if (isLVM($hd)) { lvm::lv_delete($hd, $_) foreach @parts } else { - partition_table_raw::zero_MBR_and_dirty($hd); + partition_table::raw::zero_MBR_and_dirty($hd); } } @@ -488,7 +488,7 @@ sub Delete { fsedit::recompute_loopbacks($all_hds); } else { if (arch() =~ /ppc/) { - undef $partition_table_mac::bootstrap_part if (isAppleBootstrap($part) && ($part->{device} = $partition_table_mac::bootstrap_part)); + undef $partition_table::mac::bootstrap_part if (isAppleBootstrap($part) && ($part->{device} = $partition_table::mac::bootstrap_part)); } partition_table::remove($hd, $part); warn_if_renumbered($in, $hd); @@ -624,7 +624,7 @@ sub Resize { } #- make sure that even after normalizing the size to cylinder boundaries, the minimun will be saved, #- this save at least a cylinder (less than 8Mb). - $min += partition_table_raw::cylinder_size($hd); + $min += partition_table::raw::cylinder_size($hd); $min >= $max and return $in->ask_warn('', _("This partition is not resizeable")); #- for these, we have tools to resize partition table |