aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authordakkar <dakkar@thenautilus.net>2010-02-17 23:08:06 +0000
committerdakkar <dakkar@thenautilus.net>2010-02-17 23:08:06 +0000
commit565442655f6fde476dd3822f2b66f6f34ad418bb (patch)
treee17c13aa3f4e2cd6b75392280060f18cb3b23b83
parentstill segfaults (diff)
downloadWebCoso-565442655f6fde476dd3822f2b66f6f34ad418bb.tar.gz
WebCoso-565442655f6fde476dd3822f2b66f6f34ad418bb.tar.bz2
WebCoso-565442655f6fde476dd3822f2b66f6f34ad418bb.zip
don't call parsers on not-found files
-rw-r--r--lib/File/Cache/Parsed.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/File/Cache/Parsed.pm b/lib/File/Cache/Parsed.pm
index a8a8e2e..57426b6 100644
--- a/lib/File/Cache/Parsed.pm
+++ b/lib/File/Cache/Parsed.pm
@@ -85,6 +85,8 @@ sub get {
my $contents=try {file($filename)->slurp} catch {return};
+ return unless defined $contents;
+
my $pp=first {$filename =~ m{$_->[0]}} @{$self->{parsers}};
if ($pp) {
return $self->{cache}{$filename}=$pp->[1]->($filename,$contents);