diff options
Diffstat (limited to 'perl-install/resize_fat/fat.pm')
| -rw-r--r-- | perl-install/resize_fat/fat.pm | 4 | 
1 files changed, 2 insertions, 2 deletions
| diff --git a/perl-install/resize_fat/fat.pm b/perl-install/resize_fat/fat.pm index c08232628..20145982b 100644 --- a/perl-install/resize_fat/fat.pm +++ b/perl-install/resize_fat/fat.pm @@ -1,4 +1,4 @@ -package resize_fat::fat; # $Id$ +package resize_fat::fat;  use diagnostics;  use strict; @@ -30,7 +30,7 @@ sub write($) {  #- allocates where all the clusters will be moved to. Clusters before cut_point  #- remain in the same position, however cluster that are part of a directory are  #- moved regardless (this is a mechanism to prevent data loss) (cut_point is the -#- first cluster that won't occur in the new fs) +#- first cluster that will not occur in the new fs)  sub allocate_remap {      my ($fs, $cut_point) = @_;      my ($cluster, $new_cluster); | 
