better logging of sql

[dbsrgits/DBIx-Class-DeploymentHandler.git] / lib / DBIx / Class / DeploymentHandler / DeployMethod / SQL / Translator.pm

diff --git a/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm b/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm
index a706b62..cb07a89 100644 (file)
--- a/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm
+++ b/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm
@@ -156,8 +156,7 @@ method _ddl_schema_down_produce_filename($type, $versions, $dir) {
 method _run_sql_array($sql) {
   my $storage = $self->storage;
 
-  my $ret = join "\n", @$sql;
-  log_trace { "[DBICDH] Running SQL $sql" };
+  log_trace { '[DBICDH] Running SQL ' . Dumper($sql) };
   foreach my $line (@{$sql}) {
     $storage->_query_start($line);
     try {
@@ -170,7 +169,7 @@ method _run_sql_array($sql) {
     }
     $storage->_query_end($line);
   }
-  return $ret
+  return join "\n", @$sql
 }
 
 method _run_sql($filename) {