diff options
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]) ] }; |