[Bast-commits] r7311 - DBIx-Class/0.08/trunk/lib/DBIx/Class

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2009-08-12 14:11:24 +0000 (Wed, 12 Aug 2009)
New Revision: 7311

Modified:
   DBIx-Class/0.08/trunk/lib/DBIx/Class/Ordered.pm
Log:
Remove needless inflate in Ordered

Modified: DBIx-Class/0.08/trunk/lib/DBIx/Class/Ordered.pm
===================================================================
--- DBIx-Class/0.08/trunk/lib/DBIx/Class/Ordered.pm	2009-08-12 13:21:43 UTC (rev 7310)
+++ DBIx-Class/0.08/trunk/lib/DBIx/Class/Ordered.pm	2009-08-12 14:11:24 UTC (rev 7311)
@@ -564,7 +564,7 @@
     # these steps are necessary to keep the external appearance of
     # ->update($upd) so that other things overloading update() will
     # work properly
-    my %original_values = $self->get_inflated_columns;
+    my %original_values = $self->get_columns;
     my %existing_changes = $self->get_dirty_columns;
 
     # See if any of the *supplied* changes would affect the ordering