From 1a40947dcb1ca6cf43349972d2062fddeda4daa5 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 30 Jul 2001 17:11:09 +0000
Subject: switch to MDK::Common (i wonder why it was not done yet)

---
 perl-install/resize_fat/main.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'perl-install')

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");
 }
-- 
cgit v1.2.1