X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FCursor.pm;h=60df3792a0e262ec9e19cba2c72a42bfe8456398;hb=b1e4a1df5cd0a3cdf744e94254096196e371a5d7;hp=6a29f46fa1b6f6970538f10da3aba6878d9b25ac;hpb=658fa250be6ed1944d042ccf985d5c05d41111f6;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Storage/DBI/Cursor.pm b/lib/DBIx/Class/Storage/DBI/Cursor.pm index 6a29f46..60df379 100644 --- a/lib/DBIx/Class/Storage/DBI/Cursor.pm +++ b/lib/DBIx/Class/Storage/DBI/Cursor.pm @@ -55,7 +55,7 @@ sub new { =item Arguments: none -=item Return Value: [ $sql, @bind ] +=item Return Value: \[ $sql, @bind ] =back @@ -72,7 +72,7 @@ sub as_query { my @args = $storage->_select_args(@{$self->{args}}); my ($sql, $bind) = $storage->_prep_for_execute(@args[0 .. 2], [@args[4 .. $#args]]); - return [ $sql, @$bind ]; + return \[ "($sql)", @$bind ]; } =head2 next