projects
/
dbsrgits/DBIx-Class.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Protect DBIC as best we can from the failure mode in 7cb35852
[dbsrgits/DBIx-Class.git]
/
lib
/
DBIx
/
Class
/
Storage
/
DBI
/
ODBC
/
Firebird.pm
diff --git
a/lib/DBIx/Class/Storage/DBI/ODBC/Firebird.pm
b/lib/DBIx/Class/Storage/DBI/ODBC/Firebird.pm
index
2b555ba
..
91f7292
100644
(file)
--- a/
lib/DBIx/Class/Storage/DBI/ODBC/Firebird.pm
+++ b/
lib/DBIx/Class/Storage/DBI/ODBC/Firebird.pm
@@
-8,6
+8,7
@@
use base qw/
/;
use mro 'c3';
use Try::Tiny;
+use DBIx::Class::_Util 'dbic_internal_try';
use namespace::clean;
=head1 NAME
@@
-48,7
+49,7
@@
sub _exec_svp_release { 1 }
sub _exec_svp_rollback {
my ($self, $name) = @_;
- try {
+ dbic_internal_try {
$self->_dbh->do("ROLLBACK TO SAVEPOINT $name")
}
catch {