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 | |
| parent | 6ed6b5341362f87e3c70420f206a33f71c72a3de (diff) | |
| download | drakx-backup-do-not-use-61b0cd36577df2a9f86cb2c08d14737f0bbcb557.tar drakx-backup-do-not-use-61b0cd36577df2a9f86cb2c08d14737f0bbcb557.tar.gz drakx-backup-do-not-use-61b0cd36577df2a9f86cb2c08d14737f0bbcb557.tar.bz2 drakx-backup-do-not-use-61b0cd36577df2a9f86cb2c08d14737f0bbcb557.tar.xz drakx-backup-do-not-use-61b0cd36577df2a9f86cb2c08d14737f0bbcb557.zip | |
g Move 2: partition table: hierarchy
Diffstat (limited to 'perl-install/diskdrake')
| -rw-r--r-- | perl-install/diskdrake/hd_gtk.pm | 2 | ||||
| -rw-r--r-- | perl-install/diskdrake/interactive.pm | 8 |
2 files changed, 5 insertions, 5 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm index 2de971f89..35342c6e3 100644 --- a/perl-install/diskdrake/hd_gtk.pm +++ b/perl-install/diskdrake/hd_gtk.pm @@ -7,7 +7,7 @@ use common; use resize_fat::main; use my_gtk qw(:helpers :wrappers :ask); use partition_table qw(:types); -use partition_table_raw; +use partition_table::raw; use detect_devices; use diskdrake::interactive; use run_program; 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 |