[Catalyst-commits] r10917 - in
Catalyst-Controller-DBIC-API/1.003/trunk: .
lib/Catalyst/Controller/DBIC lib/Catalyst/Controller/DBIC/API
t/lib/RestTest/Schema/Result t/var
lukes at dev.catalyst.perl.org
lukes at dev.catalyst.perl.org
Fri Jul 17 09:17:53 GMT 2009
Author: lukes
Date: 2009-07-17 09:17:53 +0000 (Fri, 17 Jul 2009)
New Revision: 10917
Modified:
Catalyst-Controller-DBIC-API/1.003/trunk/Changes
Catalyst-Controller-DBIC-API/1.003/trunk/lib/Catalyst/Controller/DBIC/API.pm
Catalyst-Controller-DBIC-API/1.003/trunk/lib/Catalyst/Controller/DBIC/API/Base.pm
Catalyst-Controller-DBIC-API/1.003/trunk/t/lib/RestTest/Schema/Result/Track.pm
Catalyst-Controller-DBIC-API/1.003/trunk/t/var/DBIxClass.db
Log:
updated Changes
Modified: Catalyst-Controller-DBIC-API/1.003/trunk/Changes
===================================================================
--- Catalyst-Controller-DBIC-API/1.003/trunk/Changes 2009-07-17 09:17:23 UTC (rev 10916)
+++ Catalyst-Controller-DBIC-API/1.003/trunk/Changes 2009-07-17 09:17:53 UTC (rev 10917)
@@ -1,5 +1,8 @@
Revision history for Catalyst-Controller-DBIC-API
+1.003001
+- Minor fix to prevent failing test
+
1.003000
- Added prefetch support
- Refactored to ensure all request params accept JSON, CGI::Expand or standard params
Modified: Catalyst-Controller-DBIC-API/1.003/trunk/lib/Catalyst/Controller/DBIC/API/Base.pm
===================================================================
--- Catalyst-Controller-DBIC-API/1.003/trunk/lib/Catalyst/Controller/DBIC/API/Base.pm 2009-07-17 09:17:23 UTC (rev 10916)
+++ Catalyst-Controller-DBIC-API/1.003/trunk/lib/Catalyst/Controller/DBIC/API/Base.pm 2009-07-17 09:17:53 UTC (rev 10917)
@@ -288,7 +288,7 @@
my %values;
my %requires_map = map { $_ => 1 } @{($object->in_storage) ? [] : $c->stash->{create_requires} || $self->create_requires};
my %allows_map = map { (ref $_) ? %{$_} : ($_ => 1) } (keys %requires_map, @{($object->in_storage) ? ($c->stash->{update_allows} || $self->update_allows) : ($c->stash->{create_allows} || $self->create_allows)});
-
+
foreach my $key (keys %allows_map) {
# check value defined if key required
my $allowed_fields = $allows_map{$key};
Modified: Catalyst-Controller-DBIC-API/1.003/trunk/lib/Catalyst/Controller/DBIC/API.pm
===================================================================
--- Catalyst-Controller-DBIC-API/1.003/trunk/lib/Catalyst/Controller/DBIC/API.pm 2009-07-17 09:17:23 UTC (rev 10916)
+++ Catalyst-Controller-DBIC-API/1.003/trunk/lib/Catalyst/Controller/DBIC/API.pm 2009-07-17 09:17:53 UTC (rev 10917)
@@ -9,7 +9,7 @@
=cut
-our $VERSION = '1.003000';
+our $VERSION = '1.003001';
=head1 NAME
Modified: Catalyst-Controller-DBIC-API/1.003/trunk/t/lib/RestTest/Schema/Result/Track.pm
===================================================================
--- Catalyst-Controller-DBIC-API/1.003/trunk/t/lib/RestTest/Schema/Result/Track.pm 2009-07-17 09:17:23 UTC (rev 10916)
+++ Catalyst-Controller-DBIC-API/1.003/trunk/t/lib/RestTest/Schema/Result/Track.pm 2009-07-17 09:17:53 UTC (rev 10917)
@@ -14,7 +14,7 @@
'position' => {
data_type => 'integer',
accessor => 'pos',
- default_value => 0
+ default_value => 0
},
'title' => {
data_type => 'varchar',
Modified: Catalyst-Controller-DBIC-API/1.003/trunk/t/var/DBIxClass.db
===================================================================
(Binary files differ)
More information about the Catalyst-commits
mailing list