diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-09-22 03:39:03 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-09-22 03:39:03 +0000 |
| commit | b477ec20a4637d0abd860479bb0f72f9a138eb16 (patch) | |
| tree | 1ae3eaf7bcca5a29b6eff766e9bcb10e630208e2 | |
| parent | 2f3d0e197086ddd1c2acf58ef47ebd7c6805b981 (diff) | |
| download | drakx-b477ec20a4637d0abd860479bb0f72f9a138eb16.tar drakx-b477ec20a4637d0abd860479bb0f72f9a138eb16.tar.gz drakx-b477ec20a4637d0abd860479bb0f72f9a138eb16.tar.bz2 drakx-b477ec20a4637d0abd860479bb0f72f9a138eb16.tar.xz drakx-b477ec20a4637d0abd860479bb0f72f9a138eb16.zip | |
more logging
| -rw-r--r-- | perl-install/partition_table/dos.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/partition_table/dos.pm b/perl-install/partition_table/dos.pm index 8a24cec84..d0e0d8bb5 100644 --- a/perl-install/partition_table/dos.pm +++ b/perl-install/partition_table/dos.pm @@ -215,9 +215,11 @@ sub read { # write the partition table (and extended ones) # for each entry, it uses fields: start, size, pt_type, active -sub write($$$;$) { +sub write { my ($hd, $sector, $pt) = @_; + log::l("partition::dos::write $hd->{device}" . backtrace()); + #- handle testing for writing partition table on file only! my $F; if ($::testing) { |