From: Arthur Axel "fREW" Schmidt <frioux@gmail.com>
Date: Thu, 9 Sep 2010 21:37:06 +0000 (+0000)
Subject: in case there were no bindargs passed
X-Git-Tag: v1.70~68
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=25d4d820c54c2d09d613ed1c90a72c9a9058373f;p=dbsrgits%2FSQL-Abstract.git

in case there were no bindargs passed
---

diff --git a/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm b/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm
index 4cae709..5472e42 100644
--- a/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm
+++ b/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm
@@ -23,7 +23,7 @@ sub new {
 sub print {
   my $self = shift;
   my $string = shift;
-  my $bindargs = shift;
+  my $bindargs = shift || [];
 
   my $use_placeholders = !!$self->_sqlat->fill_in_placeholders;