Release 1.51
Peter Rabbitson [Sat, 28 Mar 2009 10:04:39 +0000 (10:04 +0000)]
Changes
lib/SQL/Abstract.pm
t/04modifiers.t

diff --git a/Changes b/Changes
index 3bf72e9..8f90b2f 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,6 +1,11 @@
 Revision history for SQL::Abstract
 
 ----------------------------
+revision 1.51  2009-03-28 10:00 (UTC)
+    - fixed behavior of [-and => ... ] depending on the current 
+      condition scope. This introduces backwards comp with 1.24
+
+----------------------------
 revision 1.50  2009-03-10 12:30 (UTC)
     - fixed the problem with values() not behaving the same as the rest of the code (RT#43483)
     - fixed interjecting arrayrefref into a where clause
index 65b5011..93e0393 100644 (file)
@@ -15,7 +15,7 @@ use Scalar::Util qw/blessed/;
 # GLOBALS
 #======================================================================
 
-our $VERSION  = '1.50';
+our $VERSION  = '1.51';
 
 # This would confuse some packagers
 #$VERSION      = eval $VERSION; # numify for warning-free dev releases
@@ -2216,11 +2216,6 @@ support for the { operator => \["...", @bind] } construct (to embed literal SQL
 
 =item *
 
-added official support for -nest1, -nest2 or -nest_1, -nest_2, ...
-(undocumented in previous versions)
-
-=item *
-
 optional support for L<array datatypes|/"Inserting and Updating Arrays">
 
 =item * 
index c4960ba..9a3349d 100755 (executable)
@@ -341,6 +341,9 @@ my @numbered_mods = (
 plan tests => @and_or_tests*3 + @numbered_mods*4;
 
 for my $case (@and_or_tests) {
+  TODO: {
+    local $TODO = $case->{todo} if $case->{todo};
+
     local $Data::Dumper::Terse = 1;
 
     my @w;
@@ -358,6 +361,7 @@ for my $case (@and_or_tests) {
     });
     is (@w, 0, 'No warnings within and-or tests')
       || diag join "\n", 'Emitted warnings:', @w;
+  }
 }
 
 my $w_str = "\QUse of [and|or|nest]_N modifiers is deprecated and will be removed in SQLA v2.0\E";