X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FCursor.pm;h=eee5cbbb2232e6495da5ac84a9d26585cafee26e;hb=a6646e1b0a25acfd21cc3e32b8c479dd0f3526ef;hp=5eefed0a1fbd629918b700722324a4fe1edb5ba0;hpb=05b22e331fab6a8c8773eb7bd52cb360ade69180;p=dbsrgits%2FDBIx-Class.git

diff --git a/lib/DBIx/Class/Storage/DBI/Cursor.pm b/lib/DBIx/Class/Storage/DBI/Cursor.pm
index 5eefed0..eee5cbb 100644
--- 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->FETCH('Active');
   }
 }