X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/6618641eb6561393c1a35d93db61d3bb4bbea402..23f857a6f05af4d741625bfc4c93e8a490401b1f:/t/007broken_links.t diff --git a/t/007broken_links.t b/t/007broken_links.t index ee0021ef8..5ac03bca6 100644 --- a/t/007broken_links.t +++ b/t/007broken_links.t @@ -26,6 +26,7 @@ my $finder = URI::Find->new(sub { }); find(sub { + return unless -f $File::Find::name; open(FH, $File::Find::name) or return; my $text; { local $/; $text = ; }