[Bast-commits] r7954 - DBIx-Class/0.08/branches/create_scalarref_rt51559/t/inflate

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2009-11-25 23:24:23 +0000 (Wed, 25 Nov 2009)
New Revision: 7954

Modified:
   DBIx-Class/0.08/branches/create_scalarref_rt51559/t/inflate/core.t
Log:
Looks like we nailed a todo

Modified: DBIx-Class/0.08/branches/create_scalarref_rt51559/t/inflate/core.t
===================================================================
--- DBIx-Class/0.08/branches/create_scalarref_rt51559/t/inflate/core.t	2009-11-25 23:19:21 UTC (rev 7953)
+++ DBIx-Class/0.08/branches/create_scalarref_rt51559/t/inflate/core.t	2009-11-25 23:24:23 UTC (rev 7954)
@@ -64,15 +64,9 @@
 ok(!$@, 'set_inflated_column to "year + 1"');
 $cd->update;
 
-TODO: {
-  local $TODO = 'this was left in without a TODO - should it work?';
+$cd->store_inflated_column('year', \'year + 1');
+is_deeply( $cd->year, \'year + 1', 'scalarref deflate passthrough ok' );
 
-  lives_ok (sub {
-    $cd->store_inflated_column('year', \'year + 1');
-    is_deeply( $cd->year, \'year + 1', 'deflate ok' );
-  }, 'store_inflated_column to "year + 1"');
-}
-
 $cd = $rs->find(3);
 is( $cd->year->year, $before_year+1, 'deflate ok' );