diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 1999-10-10 13:03:27 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 1999-10-10 13:03:27 +0000 |
| commit | eaf1f7e94354b3bf37db6864de8364ffbda223f7 (patch) | |
| tree | 05731f231be1d45508a726543a7f01226dacd0b1 /perl-install/resize_fat/dir_entry.pm | |
| parent | 5e3f79e9a036b95eb9508746a5e47acda54586b0 (diff) | |
| download | drakx-eaf1f7e94354b3bf37db6864de8364ffbda223f7.tar drakx-eaf1f7e94354b3bf37db6864de8364ffbda223f7.tar.gz drakx-eaf1f7e94354b3bf37db6864de8364ffbda223f7.tar.bz2 drakx-eaf1f7e94354b3bf37db6864de8364ffbda223f7.tar.xz drakx-eaf1f7e94354b3bf37db6864de8364ffbda223f7.zip | |
no_comment
Diffstat (limited to 'perl-install/resize_fat/dir_entry.pm')
| -rw-r--r-- | perl-install/resize_fat/dir_entry.pm | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/perl-install/resize_fat/dir_entry.pm b/perl-install/resize_fat/dir_entry.pm index cfee23dae..0739b0951 100644 --- a/perl-install/resize_fat/dir_entry.pm +++ b/perl-install/resize_fat/dir_entry.pm @@ -21,14 +21,9 @@ sub set_cluster($$) { $entry->{first_cluster_high} = $val >> 16 if $resize_fat::isFAT32; } -sub is_directory_raw($) { - my ($entry) = @_; - !is_special_entry($entry) && $entry->{attributes} & $DIRECTORY_ATTR; -} - sub is_directory($) { my ($entry) = @_; - is_directory_raw($entry) && $entry->{name} !~ /^\.\.? /; + $entry->{attributes} & $DIRECTORY_ATTR && $entry->{name} !~ /^\.\.? / && !is_special_entry($entry); } sub is_volume($) { |