| Subject: | bad syntax for hash slice |
*** Class/DBI/Sweet.pm~ Tue Nov 28 16:57:10 2006
--- Class/DBI/Sweet.pm Tue Nov 28 17:01:18 2006
***************
*** 306,312 ****
for my $part ( @$statement_order ) {
# For backward compatibility
if ( $part eq 'sql' ) {
! push @sql_parts, join ' ', @{%$sql_parts}{qw/ where order_by limit/};
next;
}
if ( exists $sql_parts->{ $part } ) {
--- 306,312 ----
for my $part ( @$statement_order ) {
# For backward compatibility
if ( $part eq 'sql' ) {
! push @sql_parts, join ' ', @{$sql_parts}{qw/ where order_by limit/};
next;
}
if ( exists $sql_parts->{ $part } ) {