X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fstorage%2Ftxn_scope_guard.t;h=4a2c14b19a7e78dd3a7acb4a38f1c1086e907a4b;hb=f2f65c95b32700b37efc1e0641402b31d09d7c13;hp=4deffdd5d7f5d2265f2a8b1ed098ebd02f123252;hpb=a04141382e5dc37ab58323870c2efedf3851b89e;p=dbsrgits%2FDBIx-Class.git diff --git a/t/storage/txn_scope_guard.t b/t/storage/txn_scope_guard.t index 4deffdd..4a2c14b 100644 --- a/t/storage/txn_scope_guard.t +++ b/t/storage/txn_scope_guard.t @@ -178,8 +178,8 @@ for my $post_poison (0,1) { # this always fails ! $pre_poison or - # I do not underdtand why but on <= 5.8.8 and $pre_poison && $post_poison passes... - $] > 5.008008 + # I do not understand why but on <= 5.8.8 and on 5.10.0 "$pre_poison && $post_poison" passes... + ($] > 5.008008 and $] < 5.010000 ) or $] > 5.010000 )); is (@w, 2, "Both expected warnings found - \$\@ pre-poison: $pre_poison, post-poison: $post_poison" );