X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2Fmake_dbictest_db_plural_tables.pm;h=b44a5eaf424a5d12ed1288571014336d3686d7d6;hb=6d358d5830e93cbb969f4fec62d499d15f9a23e8;hp=39b1f7b721c72a97dc6f36bd195b431c1ec6509d;hpb=c4a69b87bd3d3fdda08f05d363311a6e9d3fc0f7;p=dbsrgits%2FDBIx-Class-Schema-Loader.git

diff --git a/t/lib/make_dbictest_db_plural_tables.pm b/t/lib/make_dbictest_db_plural_tables.pm
index 39b1f7b..b44a5ea 100644
--- a/t/lib/make_dbictest_db_plural_tables.pm
+++ b/t/lib/make_dbictest_db_plural_tables.pm
@@ -35,6 +35,6 @@ $dbh->do($_) for (
     q|INSERT INTO bars VALUES (4,1)|,
 );
 
-END { unlink($fn); }
+END { unlink($fn) unless $ENV{SCHEMA_LOADER_TESTS_NOCLEANUP}; }
 
 1;