diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 1999-08-28 10:19:54 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 1999-08-28 10:19:54 +0000 |
| commit | 2d3b13d3b7e6f08f6310467ece7d399c5858d233 (patch) | |
| tree | 61e0a5cc6284c4e8dc138385da6329f2b8e83e0f /perl-install/partition_table_raw.pm | |
| parent | 90f7bb2359c71498b66bf6eb4ed764671816ace6 (diff) | |
| download | drakx-2d3b13d3b7e6f08f6310467ece7d399c5858d233.tar drakx-2d3b13d3b7e6f08f6310467ece7d399c5858d233.tar.gz drakx-2d3b13d3b7e6f08f6310467ece7d399c5858d233.tar.bz2 drakx-2d3b13d3b7e6f08f6310467ece7d399c5858d233.tar.xz drakx-2d3b13d3b7e6f08f6310467ece7d399c5858d233.zip | |
no_comment
Diffstat (limited to 'perl-install/partition_table_raw.pm')
| -rw-r--r-- | perl-install/partition_table_raw.pm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/perl-install/partition_table_raw.pm b/perl-install/partition_table_raw.pm index aa25321a2..7d74debb5 100644 --- a/perl-install/partition_table_raw.pm +++ b/perl-install/partition_table_raw.pm @@ -57,7 +57,7 @@ sub openit($$;$) { sysopen $_[1], $_[0]{file}, $_[2] || 0; } sub kernel_read($) { my ($hd) = @_; local *F; openit($hd, \*F) or return 0; - ioctl(F, c::BLKRRPART(), 0) or die "kernel_read failed: need to reboot"; + $hd->{rebootNeeded} = !ioctl(F, c::BLKRRPART(), 0); } sub read($$) { @@ -102,6 +102,8 @@ sub write($$$) { sub clear_raw { { raw => [ ({}) x $nb_primary ] } } sub zero_MBR($) { - $_[0]{primary} = clear_raw(); - delete $_[0]{extended}; + my ($hd) = @_; + $hd->{isDirty} = $hd->{needKernelReread} = 1; + $hd->{primary} = clear_raw(); + delete $hd->{extended}; } |