X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/9443fef35c0b8627d3690526de7df7eb49ff1ca0..af2053931fb484b246ba42f93df4889c4257ab42:/t/rdbo_consistency.t

diff --git a/t/rdbo_consistency.t b/t/rdbo_consistency.t
index 7b5cedb3e..89d78a557 100644
--- a/t/rdbo_consistency.t
+++ b/t/rdbo_consistency.t
@@ -49,6 +49,7 @@ sub test_db_included_in_all {
 
 sub test_use_in_all_exists_as_db {
   foreach my $package (map { m/^use\s+(.+?);/; $1 } grep { '^use SL::DB::' } split m/\n/, $all_content) {
+    next unless $package;
     next unless $package =~ m/^SL::DB::(.+)/;
     my $file = $1;
     $file    =~ s{::}{/}g;