projects
/
dbsrgits/DBIx-Class.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Relax overly aggressive exception-well-formedness checks from 84e4e006
[dbsrgits/DBIx-Class.git]
/
t
/
storage
/
txn_scope_guard.t
diff --git
a/t/storage/txn_scope_guard.t
b/t/storage/txn_scope_guard.t
index
1b405bd
..
2df2ab6
100644
(file)
--- a/
t/storage/txn_scope_guard.t
+++ b/
t/storage/txn_scope_guard.t
@@
-207,6
+207,7
@@
for my $post_poison (0,1) {
lives_ok {
# this is what poisons $@
Text::Balanced::extract_bracketed( '(foo', '()' );
+ DBIx::Class::_Util::is_exception($@);
my $s = DBICTest::Schema->connect('dbi:SQLite::memory:');
my $g = $s->txn_scope_guard;