[Bast-commits] r5829 - in SQL-Abstract/1.x/trunk: . lib/SQL t

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2009-03-28 10:04:39 +0000 (Sat, 28 Mar 2009)
New Revision: 5829

Modified:
   SQL-Abstract/1.x/trunk/Changes
   SQL-Abstract/1.x/trunk/lib/SQL/Abstract.pm
   SQL-Abstract/1.x/trunk/t/04modifiers.t
Log:
Release 1.51

Modified: SQL-Abstract/1.x/trunk/Changes
===================================================================
--- SQL-Abstract/1.x/trunk/Changes	2009-03-28 02:23:57 UTC (rev 5828)
+++ SQL-Abstract/1.x/trunk/Changes	2009-03-28 10:04:39 UTC (rev 5829)
@@ -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

Modified: SQL-Abstract/1.x/trunk/lib/SQL/Abstract.pm
===================================================================
--- SQL-Abstract/1.x/trunk/lib/SQL/Abstract.pm	2009-03-28 02:23:57 UTC (rev 5828)
+++ SQL-Abstract/1.x/trunk/lib/SQL/Abstract.pm	2009-03-28 10:04:39 UTC (rev 5829)
@@ -15,7 +15,7 @@
 # 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 @@
 
 =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 * 

Modified: SQL-Abstract/1.x/trunk/t/04modifiers.t
===================================================================
--- SQL-Abstract/1.x/trunk/t/04modifiers.t	2009-03-28 02:23:57 UTC (rev 5828)
+++ SQL-Abstract/1.x/trunk/t/04modifiers.t	2009-03-28 10:04:39 UTC (rev 5829)
@@ -341,6 +341,9 @@
 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 @@
     });
     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";