From: Rafael Kitover Date: Mon, 8 Feb 2010 13:33:09 +0000 (+0000) Subject: test update X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=babd3d8e4792caf5b7d0edc501c7c3e254d5d950;p=dbsrgits%2FDBIx-Class-Historic.git test update --- diff --git a/t/750firebird.t b/t/750firebird.t index d7f80cf..8eb4557 100644 --- a/t/750firebird.t +++ b/t/750firebird.t @@ -89,6 +89,12 @@ EOF $new->discard_changes; is($new->artistid, 66, 'Explicit PK assigned'); + lives_ok { + $new->update({ name => 'baz' }) + } 'update survived'; + $new->discard_changes; + is $new->name, 'baz', 'row updated'; + # test populate lives_ok (sub { my @pop;