From: Peter Rabbitson Date: Sat, 20 Oct 2012 13:50:42 +0000 (+0200) Subject: Fix embarassing test-leak introduced in 0.08203 X-Git-Tag: v0.08204~23 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=08615cfbc61aeab6275774832560a6ba3b1edeaf;hp=80e1ff141cbc508aecd8570c008138a92060f43b;p=dbsrgits%2FDBIx-Class.git Fix embarassing test-leak introduced in 0.08203 --- diff --git a/t/752sqlite.t b/t/752sqlite.t index 272021b..b5d11ca 100644 --- a/t/752sqlite.t +++ b/t/752sqlite.t @@ -106,10 +106,11 @@ DDL # this never worked in the 1st place local $TODO = 'SQLite is retarded wrt detecting COMMIT' if ! $c_begin and $c_commit; + # odd argument passing, because such nested crefs leak on 5.8 lives_ok { $schema->storage->txn_do (sub { - ok ($ars->find({ name => $artist->name }), "Artist still where we left it after cycle with comments on $prefix_comment"); - }); + ok ($_[0]->find({ name => $_[1] }), "Artist still where we left it after cycle with comments on $prefix_comment"); + }, $ars, $artist->name ); } "Succesfull transaction with comments on $prefix_comment"; } }