[Bast-commits] r9084 - DBIx-Class/0.08/trunk/t

caelum at dev.catalyst.perl.org caelum at dev.catalyst.perl.org
Mon Apr 5 20:08:48 GMT 2010


Author: caelum
Date: 2010-04-05 21:08:48 +0100 (Mon, 05 Apr 2010)
New Revision: 9084

Modified:
   DBIx-Class/0.08/trunk/t/746sybase.t
Log:
fix test count

Modified: DBIx-Class/0.08/trunk/t/746sybase.t
===================================================================
--- DBIx-Class/0.08/trunk/t/746sybase.t	2010-04-05 19:53:13 UTC (rev 9083)
+++ DBIx-Class/0.08/trunk/t/746sybase.t	2010-04-05 20:08:48 UTC (rev 9084)
@@ -569,10 +569,10 @@
     $row->update({ amount => undef });
   } 'updated a money value to NULL';
 
-  lives_ok {
+  lives_and {
     my $null_amount = $rs->find($row->id)->amount;
-    is ($null_amount, undef, 'updated money value to NULL round-trip');
-  };
+    is $null_amount, undef;
+  } 'updated money value to NULL round-trip';
 
 # Test computed columns and timestamps
   $schema->storage->dbh_do (sub {




More information about the Bast-commits mailing list