diff --git a/lib/Devel/Cover/DB.pm b/lib/Devel/Cover/DB.pm index a8016787..333391c7 100644 --- a/lib/Devel/Cover/DB.pm +++ b/lib/Devel/Cover/DB.pm @@ -721,7 +721,7 @@ sub uncoverable_comments open my $fh, "<", $file or do { warn "Devel::Cover: Can't open file $file: $!\n"; - next; + return; }; my @waiting; while (<$fh>)