[Catalyst-commits] r14468 - in CatalystX-CRUD/CatalystX-CRUD/trunk: . lib/CatalystX lib/CatalystX/CRUD lib/CatalystX/CRUD/Iterator lib/CatalystX/CRUD/Model lib/CatalystX/CRUD/ModelAdapter lib/CatalystX/CRUD/Object lib/CatalystX/CRUD/Test

karpet at dev.catalyst.perl.org karpet at dev.catalyst.perl.org
Wed Oct 30 20:12:07 GMT 2013


Author: karpet
Date: 2013-10-30 20:12:07 +0000 (Wed, 30 Oct 2013)
New Revision: 14468

Modified:
   CatalystX-CRUD/CatalystX-CRUD/trunk/Changes
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Controller.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Iterator.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Iterator/File.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model/File.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model/Utils.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/ModelAdapter/File.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object/File.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/REST.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Results.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Test/Controller.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Test/Form.pm
Log:
remove : as rxOp field delimiter for internal Search::QueryParser::SQL object

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/Changes
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/Changes	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/Changes	2013-10-30 20:12:07 UTC (rev 14468)
@@ -1,5 +1,10 @@
 Revision history for CatalystX-CRUD
 
+0.56 xxx
+ - remove : character from rxOp param in internal Search::QueryParser::SQL
+   constructor. This allows for finding url values like http://foo/bar
+   which previously would be parsed as http=//foo/bar
+
 0.55 28 Jan 2013
  - add Iterator->serialize() method.
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Controller.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Controller.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Controller.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -42,7 +42,7 @@
 # apply Role *after* we declare accessors above
 with 'CatalystX::CRUD::ControllerRole';
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 =head1 NAME
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Iterator/File.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Iterator/File.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Iterator/File.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -3,7 +3,7 @@
 use warnings;
 use Carp;
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 =head1 NAME
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Iterator.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Iterator.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Iterator.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -4,7 +4,7 @@
 use Carp;
 use base qw( CatalystX::CRUD );
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 =head1 NAME
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model/File.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model/File.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model/File.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -10,7 +10,7 @@
 
 __PACKAGE__->mk_accessors(qw( inc_path ));
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 # test whether symlink() works at compile time
 my $SYMLINK_SUPPORTED = eval { symlink( "", "" ); 1 };

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model/Utils.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model/Utils.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model/Utils.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -9,7 +9,7 @@
 
 __PACKAGE__->mk_accessors(qw( use_ilike ne_sign ));
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 =head1 NAME
 
@@ -150,7 +150,7 @@
 sub make_sql_query {
     my $self = shift;
     my $c    = $self->context;
-    my $field_names 
+    my $field_names
         = shift
         || $c->req->params->{'cxc-query-fields'}
         || $c->controller->field_names($c)
@@ -173,7 +173,7 @@
     my $sp     = Sort::SQL->string2array( $self->_which_sort($c) );
     my $s      = join( ', ', map { join( ' ', %$_ ) } @$sp );
     my $offset = $params->{'cxc-offset'} || $params->{'_offset'};
-    my $page_size 
+    my $page_size
         = $params->{'cxc-page_size'}
         || $params->{'_page_size'}
         || $c->controller->page_size
@@ -248,7 +248,7 @@
     my ( $self, $field_names ) = @_;
     croak "field_names ARRAY ref required"
         unless defined $field_names
-            and ref($field_names) eq 'ARRAY';
+        and ref($field_names) eq 'ARRAY';
     my $c = $self->context;
     my ( @sql, %pq );
     my $ne = $self->ne_sign || '!=';
@@ -311,6 +311,7 @@
                 fuzzify => $fuzzy,
                 columns => \%columns,
                 strict  => 1,
+                rxOp    => qr/==|<=|>=|!=|=~|!~|=|<|>|~/,
             );
             if ($fuzzy2) {
                 delete $args{fuzzify};
@@ -346,6 +347,7 @@
                 : [ keys %columns ]
             ),
             strict => 1,
+            rxOp   => qr/==|<=|>=|!=|=~|!~|=|<|>|~/,
 
         );
         if ($fuzzy2) {

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -9,7 +9,7 @@
     Catalyst::Model
 );
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 __PACKAGE__->mk_accessors(qw( object_class page_size ));
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/ModelAdapter/File.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/ModelAdapter/File.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/ModelAdapter/File.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -3,7 +3,7 @@
 use warnings;
 use base qw( CatalystX::CRUD::ModelAdapter );
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 =head1 NAME
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object/File.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object/File.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object/File.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -13,7 +13,7 @@
 __PACKAGE__->mk_accessors(qw( content file ));
 __PACKAGE__->delegate_class('Path::Class::File');
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 =head1 NAME
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -12,7 +12,7 @@
 __PACKAGE__->mk_ro_accessors(qw( delegate ));
 __PACKAGE__->mk_classdata('delegate_class');
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 =head1 NAME
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/REST.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/REST.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/REST.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -10,7 +10,7 @@
 __PACKAGE__->mk_accessors(qw( enable_rpc_compat ));
 __PACKAGE__->config( enable_rpc_compat => 0 );
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 #warn "REST VERSION = $VERSION";
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Results.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Results.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Results.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -13,7 +13,7 @@
 
 __PACKAGE__->mk_ro_accessors(qw( count pager query results ));
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 =head1 NAME
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Test/Controller.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Test/Controller.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Test/Controller.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -8,7 +8,7 @@
 
 __PACKAGE__->mk_accessors(qw( form_fields ));
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 =head1 NAME
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Test/Form.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Test/Form.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Test/Form.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -7,7 +7,7 @@
 
 __PACKAGE__->mk_accessors(qw( params fields ));
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 =head1 NAME
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD.pm	2013-10-30 20:09:55 UTC (rev 14467)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD.pm	2013-10-30 20:12:07 UTC (rev 14468)
@@ -4,7 +4,7 @@
 use strict;
 use Carp;
 
-our $VERSION = '0.55';
+our $VERSION = '0.56';
 
 =head1 NAME
 




More information about the Catalyst-commits mailing list