From: Matt Phillips <mattp@cpan.org>
Date: Fri, 17 Aug 2012 16:47:01 +0000 (-0400)
Subject: Remove array expansion in Literal()
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=cc5ec83c718d51d26c26c6beef0c16cadf92dadf;p=dbsrgits%2FData-Query.git

Remove array expansion in Literal()

Was breaking SQL::Abstract testsuite.
---

diff --git a/lib/Data/Query/ExprHelpers.pm b/lib/Data/Query/ExprHelpers.pm
index 8c030d7..383b57c 100644
--- a/lib/Data/Query/ExprHelpers.pm
+++ b/lib/Data/Query/ExprHelpers.pm
@@ -43,7 +43,7 @@ sub Literal {
   if (ref($_[0])) {
     return +{
       type => DQ_LITERAL,
-      parts => @{$_[0]},
+      parts => $_[0],
     };
   }
   return +{