a goto in the driver-already-determined shim)
Simplify the DBI Cursor DESTROY a little
build_datetime_parser
datetime_parser_type
-
insert
insert_bulk
update
$_[0]->_determine_driver;
goto $_[0]->can($meth);
}
- $orig->(@_);
+ goto $orig;
};
}
}
sub DESTROY {
- my ($self) = @_;
-
# None of the reasons this would die matter if we're in DESTROY anyways
- try { $self->sth->finish }
- if $self->sth && $self->sth->{Active};
+ if (my $sth = $_[0]->sth) {
+ try { $sth->finish if $sth->{Active} };
+ }
}
1;