[Jifty-commit] r1006 - in Jifty-DBI/trunk: lib/Jifty/DBI
jifty-commit at lists.jifty.org
jifty-commit at lists.jifty.org
Fri May 5 16:11:09 EDT 2006
Author: ewilhelm
Date: Fri May 5 16:11:05 2006
New Revision: 1006
Modified:
Jifty-DBI/trunk/ (props changed)
Jifty-DBI/trunk/lib/Jifty/DBI/Record.pm
Log:
r848 at mjolnir: ewilhelm | 2006-04-24 08:33:45 -0700
lib/Jifty/DBI/Record.pm - added Class::ReturnValue's to disallowed accessors
Modified: Jifty-DBI/trunk/lib/Jifty/DBI/Record.pm
==============================================================================
--- Jifty-DBI/trunk/lib/Jifty/DBI/Record.pm (original)
+++ Jifty-DBI/trunk/lib/Jifty/DBI/Record.pm Fri May 5 16:11:05 2006
@@ -305,9 +305,15 @@
elsif (
UNIVERSAL::isa( $column->refers_to, "Jifty::DBI::Collection" ) )
{ # XXX elw: collections land here, now what?
- $subref = sub {
- return (0, "Collection column '$column_name' not writable")
- };
+ my $ret = Class::ReturnValue->new();
+ my $message = "Collection column '$column_name' not writable";
+ $ret->as_array( 0, $message );
+ $ret->as_error(
+ errno => 3,
+ do_backtrace => 0,
+ message => $message
+ );
+ $subref = sub { return ( $ret->return_value ); };
}
else {
$subref = sub {
More information about the Jifty-commit
mailing list