From 42321d209faa0ba4c93d2523f8644575ea094bba Mon Sep 17 00:00:00 2001
From: Arne Georg Gleditsch <argggh@lxr.linpro.no>
Date: Tue, 4 Dec 2007 13:07:07 +0100
Subject: Ignore non-existing directory entries (dangling symlinks..)

---
 lib/LXRng/Repo/Plain/Directory.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/LXRng/Repo/Plain/Directory.pm b/lib/LXRng/Repo/Plain/Directory.pm
index 788f6bc..6025142 100644
--- a/lib/LXRng/Repo/Plain/Directory.pm
+++ b/lib/LXRng/Repo/Plain/Directory.pm
@@ -40,8 +40,9 @@ sub contents {
 	next if $node =~ /^\.|~$|\.orig$/;
 	next if $node eq 'CVS';
 	
-	push(@files, LXRng::Repo::Plain::File->new($$self{'name'}.$node,
-						      $$self{'path'}.$node));
+	my $file = LXRng::Repo::Plain::File->new($$self{'name'}.$node,
+						 $$self{'path'}.$node);
+	push(@files, $file) if $file;
     }
     closedir($dir);
 
-- 
cgit v1.2.3