Auto commit by The Sugar System.

[sugar.git] / tools / list-files.pl

diff --git a/tools/list-files.pl b/tools/list-files.pl
index 673d43b8ae6e0b51e76b7e248569ca3e21298531..c736839e8768214db71743ff66861bb71fd364b2 100644 (file)
--- a/tools/list-files.pl
+++ b/tools/list-files.pl
@@ -44,7 +44,7 @@ sub find {
         my $rel = File::Spec->abs2rel($abs, $base);
 
         next if any { $rel =~ m/$_/ } @RE_IGNORED;
-        next if !-f $abs;
+        next if !-e $abs;
 
         if (-d $abs) {
             push @d, find($base, $rel);
@@ -92,7 +92,8 @@ __DATA__
 .localized
 .mozilla
 .mpd
-.mplayer
+.mplayer/DVDKeys*
+.mplayer/skins*
 .nautilus
 .navi2ch
 .nh-todo
@@ -112,7 +113,6 @@ __DATA__
 .uim.d
 .unison
 .viminfo
-.w3m
 .xchat2*
 .zcomp*
 .zfunc