[Bast-commits] r3631 - DBIx-Class/0.08/branches/jdbicompat/lib/DBIx/Class/JDBICompat

[matthewt at dev.catalyst.perl.org]

Author: matthewt
Date: 2007-07-29 19:20:47 +0100 (Sun, 29 Jul 2007)
New Revision: 3631

Modified:
   DBIx-Class/0.08/branches/jdbicompat/lib/DBIx/Class/JDBICompat/Record.pm
Log:
fixup Record.pm to not use the scalar eliminated in r3630

Modified: DBIx-Class/0.08/branches/jdbicompat/lib/DBIx/Class/JDBICompat/Record.pm
===================================================================
--- DBIx-Class/0.08/branches/jdbicompat/lib/DBIx/Class/JDBICompat/Record.pm	2007-07-29 01:05:51 UTC (rev 3630)
+++ DBIx-Class/0.08/branches/jdbicompat/lib/DBIx/Class/JDBICompat/Record.pm	2007-07-29 18:20:47 UTC (rev 3631)
@@ -879,7 +879,7 @@
         # XXX TODO primary_keys
         $self->load_by_cols( id => $self->id );
     } else {
-        $self->{'values'}{ $column->name } = $unmunged_value;
+        $self->{'values'}{ $column->name } = $args{'value'};
         $self->{'decoded'}{ $column->name } = 0;
     }
     $ret->as_array( 1, "The new value has been set." );