projects
/
dbsrgits/DBIx-Class-Historic.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(parent:
6ebac5d
)
Delay construction of try block until an active $sth is asserted
Peter Rabbitson [Sat, 2 Oct 2010 13:25:00 +0000 (15:25 +0200)]
lib/DBIx/Class/Storage/DBI/Cursor.pm
patch
|
blob
|
blame
|
history
diff --git
a/lib/DBIx/Class/Storage/DBI/Cursor.pm
b/lib/DBIx/Class/Storage/DBI/Cursor.pm
index
5eefed0
..
75b1136
100644
(file)
--- a/
lib/DBIx/Class/Storage/DBI/Cursor.pm
+++ b/
lib/DBIx/Class/Storage/DBI/Cursor.pm
@@
-179,7
+179,7
@@
sub _check_dbh_gen {
sub DESTROY {
# None of the reasons this would die matter if we're in DESTROY anyways
if (my $sth = $_[0]->sth) {
- try { $sth->finish if $sth->{Active} };
+ try { $sth->finish } if $sth->{Active};
}
}