Release 1.58
Peter Rabbitson [Fri, 4 Sep 2009 15:19:05 +0000 (15:19 +0000)]
Changes
lib/SQL/Abstract.pm
t/10test.t

diff --git a/Changes b/Changes
index 1d37352..750d35e 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,14 @@
 Revision history for SQL::Abstract
 
+revision 1.58  2009-09-04 15:20 (UTC)
+----------------------------
+    - expanded the scope of -bool and -not_bool operators
+    - added proper testing support
+
+revision 1.57  2009-09-03 20:18 (UTC)
+----------------------------
+    - added -bool and -not_bool operators
+
 revision 1.56  2009-05-30 16:31 (UTC)
 ----------------------------
     - support for \[$sql, @bind] in order_by clauses e.g.:
index 3ad246b..06c3534 100644 (file)
@@ -15,7 +15,7 @@ use Scalar::Util qw/blessed/;
 # GLOBALS
 #======================================================================
 
-our $VERSION  = '1.56';
+our $VERSION  = '1.58';
 
 # This would confuse some packagers
 #$VERSION      = eval $VERSION; # numify for warning-free dev releases
@@ -1977,7 +1977,7 @@ example to test the column C<is_user> being true and the column
 
 Would give you:
 
-    WHERE is_user AND NOT is_enabledmv 
+    WHERE is_user AND NOT is_enabled
 
 
 
index 91c9fee..41fbc9d 100644 (file)
@@ -145,6 +145,14 @@ my @sql_tests = (
         ]
       },
       {
+        equal => 1,
+        statements => [
+          q/SELECT foo FROM bar WHERE ((NOT a) AND b = 2)/,
+          q/SELECT foo FROM bar WHERE (NOT a) AND (b = 2)/,
+          q/SELECT foo FROM bar WHERE (NOT (a)) AND b = 2/,
+        ],
+      },
+      {
         equal => 0,
         statements => [
           q/SELECT foo FROM bar WHERE NOT a AND (b = 2)/,