summaryrefslogtreecommitdiffstats
path: root/perl-install/resize_fat
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-07-30 17:11:09 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-07-30 17:11:09 +0000
commit1a40947dcb1ca6cf43349972d2062fddeda4daa5 (patch)
treed14ac0d0ac1c21506fabb2b86e0e6ddff6dc1ad7 /perl-install/resize_fat
parent5ceea5e710015e7b58ccd4f8c00280ac13dc64d6 (diff)
downloaddrakx-backup-do-not-use-1a40947dcb1ca6cf43349972d2062fddeda4daa5.tar
drakx-backup-do-not-use-1a40947dcb1ca6cf43349972d2062fddeda4daa5.tar.gz
drakx-backup-do-not-use-1a40947dcb1ca6cf43349972d2062fddeda4daa5.tar.bz2
drakx-backup-do-not-use-1a40947dcb1ca6cf43349972d2062fddeda4daa5.tar.xz
drakx-backup-do-not-use-1a40947dcb1ca6cf43349972d2062fddeda4daa5.zip
switch to MDK::Common (i wonder why it was not done yet)
Diffstat (limited to 'perl-install/resize_fat')
-rw-r--r--perl-install/resize_fat/main.pm7
1 files changed, 4 insertions, 3 deletions
diff --git a/perl-install/resize_fat/main.pm b/perl-install/resize_fat/main.pm
index 3b18241a2..c6bb25637 100644
--- a/perl-install/resize_fat/main.pm
+++ b/perl-install/resize_fat/main.pm
@@ -25,7 +25,8 @@ use diagnostics;
use strict;
use log;
-use common;
+use MDK::Common;
+use MDK::Common::System;
use resize_fat::boot_sector;
use resize_fat::info_sector;
use resize_fat::directory;
@@ -101,7 +102,7 @@ sub construct_dir_tree {
resize_fat::directory::remap($fs, resize_fat::io::read_cluster($fs, $cluster)));
}
- sync();
+ MDK::Common::System::sync();
#- until now, only free clusters have been written. it's a null operation if we stop here.
#- it means no corruption :)
@@ -178,7 +179,7 @@ sub resize {
$resize_fat::isFAT32 and eval { resize_fat::info_sector::write($fs) }; #- doesn't matter if this fails - its pretty useless!
- sync();
+ MDK::Common::System::sync();
close $fs->{fd};
log::l("resize_fat: done");
}