X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fbackcompat%2F0.04006%2Flib%2Fdbixcsl_common_tests.pm;fp=t%2Fbackcompat%2F0.04006%2Flib%2Fdbixcsl_common_tests.pm;h=e4e2517e9eb58498324758246c61c7cd046751fa;hb=fb3bb5958c3dae19c8304c9e489713b956c93efb;hp=ada0338c49fdc396f5669cbe404688f702585491;hpb=1c94fb11fa5772bdc5aa8d785a429ab1d7d5fab9;p=dbsrgits%2FDBIx-Class-Schema-Loader.git

diff --git a/t/backcompat/0.04006/lib/dbixcsl_common_tests.pm b/t/backcompat/0.04006/lib/dbixcsl_common_tests.pm
index ada0338..e4e2517 100644
--- a/t/backcompat/0.04006/lib/dbixcsl_common_tests.pm
+++ b/t/backcompat/0.04006/lib/dbixcsl_common_tests.pm
@@ -113,6 +113,13 @@ sub run_tests {
         $classes->{$table_name} = $schema_class . q{::} . $source_name;
     }
 
+# for debugging...
+#    {
+#        mkdir '/tmp/HLAGH';
+#        $conn->_loader->{dump_directory} = '/tmp/HLAGH';
+#        $conn->_loader->_dump_to_dir(values %$classes);
+#    }
+
     my $moniker1 = $monikers->{loader_test1};
     my $class1   = $classes->{loader_test1};
     my $rsobj1   = $conn->resultset($moniker1);