X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F81transactions.t;h=c9d9c62d1fb8d26c98f1ed12d283ee2005a51036;hb=58d387fec14d2f92723ab0db1d64a18ee449639c;hp=fe3c453704fc2386156d44ce0537f1e49eecbb6c;hpb=d6915f449e2d68ac184d6bc616043fd605913757;p=dbsrgits%2FDBIx-Class.git diff --git a/t/81transactions.t b/t/81transactions.t index fe3c453..c9d9c62 100644 --- a/t/81transactions.t +++ b/t/81transactions.t @@ -117,6 +117,7 @@ my $fail_code = sub { # Force txn_rollback() to throw an exception no warnings 'redefine'; + no strict 'refs'; local *{"DBIx::Class::Schema::txn_rollback"} = sub{die 'FAILED'}; eval {