diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2007-09-18 12:22:14 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2007-09-18 12:22:14 +0000 |
| commit | f110caf7fb05213848c2d48fc4802b7d6babbed3 (patch) | |
| tree | 6bb604ad22264f653f0766dfe38421d73d0212d4 /perl-install/fs | |
| parent | b0fb8e21570e7d8f5b874e002e2b6455aa92c7f3 (diff) | |
| download | drakx-backup-do-not-use-f110caf7fb05213848c2d48fc4802b7d6babbed3.tar drakx-backup-do-not-use-f110caf7fb05213848c2d48fc4802b7d6babbed3.tar.gz drakx-backup-do-not-use-f110caf7fb05213848c2d48fc4802b7d6babbed3.tar.bz2 drakx-backup-do-not-use-f110caf7fb05213848c2d48fc4802b7d6babbed3.tar.xz drakx-backup-do-not-use-f110caf7fb05213848c2d48fc4802b7d6babbed3.zip | |
rename ->zero_MBR into ->clear, and ->zero_MBR_and_dirty into ->clear_and_dirty
(old name kept for compatibility)
Diffstat (limited to 'perl-install/fs')
| -rw-r--r-- | perl-install/fs/partitioning_wizard.pm | 2 | ||||
| -rw-r--r-- | perl-install/fs/proc_partitions.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm index 067e47a8c..eb9266f7c 100644 --- a/perl-install/fs/partitioning_wizard.pm +++ b/perl-install/fs/partitioning_wizard.pm @@ -211,7 +211,7 @@ filesystem checks will be run on your next boot into Microsoft Windows®")) if $ title => N("Partitioning"), icon => 'banner-part', interactive_help_id => 'takeOverHdConfirm' }) or return; - partition_table::raw::zero_MBR($hd); + partition_table::raw::clear($hd); fsedit::auto_allocate($all_hds, $partitions); 1; } ]; diff --git a/perl-install/fs/proc_partitions.pm b/perl-install/fs/proc_partitions.pm index b65ff747a..84d686c45 100644 --- a/perl-install/fs/proc_partitions.pm +++ b/perl-install/fs/proc_partitions.pm @@ -64,7 +64,7 @@ sub compare { sub use_ { my ($hd) = @_; - partition_table::raw::zero_MBR($hd); + partition_table::raw::clear($hd); $hd->{readonly} = 1; $hd->{getting_rid_of_readonly_allowed} = 1; $hd->{primary} = { normal => [ grep { $_->{rootDevice} eq $hd->{device} } &read([$hd]) ] }; |