X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F746mssql.t;h=40a61575f8e1b0dbfacbe6a4bf6a1d8e59b54a5e;hb=373380f8fd02233994c5163b55031894ba0c5e4f;hp=7812d11bf392164a37369a05ef4e1cdc8e592764;hpb=c83657164652d11fc7beed196880d1087cef7243;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/746mssql.t b/t/746mssql.t index 7812d11..40a6157 100644 --- a/t/746mssql.t +++ b/t/746mssql.t @@ -161,13 +161,14 @@ lives_ok { $row = $rs->create({ amount => 100 }); } 'inserted a money value'; -is int($rs->find($row->id)->amount), 100, 'money value round-trip'; +cmp_ok $rs->find($row->id)->amount, '==', 100, 'money value round-trip'; lives_ok { $row->update({ amount => 200 }); } 'updated a money value'; -is int($rs->find($row->id)->amount), 200, 'updated money value round-trip'; +cmp_ok $rs->find($row->id)->amount, '==', 200, + 'updated money value round-trip'; lives_ok { $row->update({ amount => undef });