From 773013b8e45a6916a74ea64152e51fb6cb951920 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sun, 14 Nov 1999 23:09:15 +0000
Subject: no_comment

---
 perl-install/resize_fat/dir_entry.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/resize_fat/dir_entry.pm')

diff --git a/perl-install/resize_fat/dir_entry.pm b/perl-install/resize_fat/dir_entry.pm
index 0739b0951..be3bd436a 100644
--- a/perl-install/resize_fat/dir_entry.pm
+++ b/perl-install/resize_fat/dir_entry.pm
@@ -51,12 +51,12 @@ sub is_special_entry($) {
 
 #- return true if entry has been modified
 sub remap {
-    my ($fat_remap, $entry) = @_;
+    my ($entry) = @_;
 
     is_special_entry($entry) and return;
 
     my $cluster = get_cluster($entry);
-    my $new_cluster = $fat_remap->[$cluster];
+    my $new_cluster = resize_fat::c_rewritten::fat_remap($cluster);
 
     #-print "remapping cluster ", get_first_cluster($fs, $entry), " to $new_cluster";
 
-- 
cgit v1.2.1