From: Arthur Axel "fREW" Schmidt <frioux@gmail.com>
Date: Sat, 23 Oct 2010 20:45:00 +0000 (+0000)
Subject: better bulk insert support
X-Git-Tag: v1.70~21
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f038abc711d1299a37477b46243d667db530b84a;p=dbsrgits%2FSQL-Abstract.git

better bulk insert support
---

diff --git a/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm b/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm
index 94fcadc..5bbadf1 100644
--- a/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm
+++ b/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm
@@ -42,8 +42,8 @@ sub print {
   my ($lw, $lr);
   ($lw, $string, $lr) = $string =~ /^(\s*)(.+?)(\s*)$/s;
 
-  return if defined $bindargs && defined $bindargs->[0] &&
-    $bindargs->[0] eq q('__BULK_INSERT__');
+  local $self->_sqlat->{fill_in_placeholders} = 0 if defined $bindargs
+    && defined $bindargs->[0] && $bindargs->[0] eq q('__BULK_INSERT__');
 
   my $use_placeholders = !!$self->_sqlat->fill_in_placeholders;