[Catalyst-commits] r8309 - in CatalystX-CRUD/CatalystX-CRUD-Model-RDBO/trunk: . lib/CatalystX/CRUD/Model

[karpet at dev.catalyst.perl.org]

Author: karpet
Date: 2008-08-28 04:21:33 +0100 (Thu, 28 Aug 2008)
New Revision: 8309

Modified:
   CatalystX-CRUD/CatalystX-CRUD-Model-RDBO/trunk/Changes
   CatalystX-CRUD/CatalystX-CRUD-Model-RDBO/trunk/lib/CatalystX/CRUD/Model/RDBO.pm
Log:
+        * support for 0.30 core api param name change
+        * add 'int' to column types registered as 'treat_like_int'



Modified: CatalystX-CRUD/CatalystX-CRUD-Model-RDBO/trunk/Changes
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD-Model-RDBO/trunk/Changes	2008-08-28 03:19:54 UTC (rev 8308)
+++ CatalystX-CRUD/CatalystX-CRUD-Model-RDBO/trunk/Changes	2008-08-28 03:21:33 UTC (rev 8309)
@@ -48,5 +48,7 @@
 0.14    xxxx
         * fix add_related() to forget_related() after save, so that next access reflects the addition.
         * move column sort disambiguation from CatalystX::CRUD::YUI::Controller to here.
+        * support for 0.30 core api param name change
+        * add 'int' to column types registered as 'treat_like_int'
 
 

Modified: CatalystX-CRUD/CatalystX-CRUD-Model-RDBO/trunk/lib/CatalystX/CRUD/Model/RDBO.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD-Model-RDBO/trunk/lib/CatalystX/CRUD/Model/RDBO.pm	2008-08-28 03:19:54 UTC (rev 8308)
+++ CatalystX-CRUD/CatalystX-CRUD-Model-RDBO/trunk/lib/CatalystX/CRUD/Model/RDBO.pm	2008-08-28 03:21:33 UTC (rev 8309)
@@ -415,7 +415,7 @@
     # treat wildcard timestamps like ints not text (>= instead of ILIKE)
     for my $name (@$col_names) {
         my $col = $self->name->meta->column($name);
-        if ( $col->type =~ m/date|time|boolean/ ) {
+        if ( $col->type =~ m/date|time|boolean|int/ ) {
             $self->{treat_like_int}->{$name} = 1;
         }
     }
@@ -431,7 +431,7 @@
 
     # many2many relationships always have two tables,
     # and we are sorting my the 2nd one. The 1st one is the mapper.
-    if ( $c->req->params->{_m2m} ) {
+    if ( $c->req->params->{cxc-m2m} ) {
         unless ( $q->{sort_by} =~ m/t\d\./ ) {
             $q->{sort_by} = join( '.', 't2', $q->{sort_by} );
         }