diff options
author | Pascal Rigaux <pixel@mandriva.com> | 1999-10-13 11:41:53 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 1999-10-13 11:41:53 +0000 |
commit | 3edbeac41e23ee13ff3e0c9c815c4ab93b279fd2 (patch) | |
tree | fbc6900f93a37f93731d0be67b95fa5a83928564 /perl-install/resize_fat/io.pm | |
parent | 5521ae98ce86e69166df6f72126bf0c300c069f4 (diff) | |
download | drakx-3edbeac41e23ee13ff3e0c9c815c4ab93b279fd2.tar drakx-3edbeac41e23ee13ff3e0c9c815c4ab93b279fd2.tar.gz drakx-3edbeac41e23ee13ff3e0c9c815c4ab93b279fd2.tar.bz2 drakx-3edbeac41e23ee13ff3e0c9c815c4ab93b279fd2.tar.xz drakx-3edbeac41e23ee13ff3e0c9c815c4ab93b279fd2.zip |
no_comment
Diffstat (limited to 'perl-install/resize_fat/io.pm')
-rw-r--r-- | perl-install/resize_fat/io.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/resize_fat/io.pm b/perl-install/resize_fat/io.pm index 48309db91..7255bc437 100644 --- a/perl-install/resize_fat/io.pm +++ b/perl-install/resize_fat/io.pm @@ -47,7 +47,7 @@ sub read_file($$) { my ($fs, $cluster) = @_; my $buf = ''; - for (; !resize_fat::fat::is_eof($cluster); $cluster = resize_fat::fat::next($fs, $cluster)) { + for (; !resize_fat::fat::is_eof($cluster); $cluster = resize_fat::fat::next ($fs, $cluster)) { $cluster == 0 and die "Bad FAT: unterminated chain\n"; $buf .= read_cluster($fs, $cluster); } |