Subject: | CGI::Session::Driver::sqlite::DESTROY throws a warning when DBI is destroyed before session object |
$CGI::Session::Driver::sqlite::VERSION = '4.38';
Same thing as ticket #35925 for CGI::Session::Driver::DBI; need to get that fix in
forCGI::Session::Driver::sqlite, it's a subclass and overrides DESTROY
(Not sure if finagling things to instead call $self->SUPER::DESTROY() would be feasible.)
Log messages:
Can't call method "ping" on an undefined value at
/Library/Perl/5.8.8/CGI/Session/Driver/sqlite.pm line 53 during global destruction.
DESTROY created new reference to dead object 'CGI::Session::Driver::sqlite' during global
destruction
Subject: | sqlite-DESTROY.patch |
--- /Library/Perl/5.8.8/CGI/Session/Driver/sqlite.pm 2009-02-03 15:25:30.000000000 -0500
+++ sqlite.pm 2009-02-14 15:37:19.000000000 -0500
@@ -50,7 +50,7 @@
sub DESTROY {
my $self = shift;
- unless ( $self->{Handle} -> ping ) {
+ unless ( defined $self->{Handle} && $self->{Handle} -> ping ) {
$self->set_error(__PACKAGE__ . '::DESTROY(). Database handle has gone away');
return;
}