From: Arthur Axel 'fREW' Schmidt <frioux@gmail.com>
Date: Thu, 20 May 2010 04:01:31 +0000 (-0500)
Subject: better logging of sql
X-Git-Tag: v0.001000_11~3
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4d09f7120015cc9b9f50fb80931be05572492229;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git

better logging of sql
---

diff --git a/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm b/lib/DBIx/Class/DeploymentHandler/DeployMethod/SQL/Translator.pm
index a706b62..cb07a89 100644
--- 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) {