Commit 6cd08dbb authored by Andy Yates's avatar Andy Yates
Browse files

Need to record the construction of the object is the last time we used it

parent 90603ccc
......@@ -66,7 +66,10 @@ sub new {
throw "No database name -DBNAME given" unless $dbname;
my $self = $class->SUPER::new($dbc);
$self->dbname($dbname);
$self->reconnect_interval($reconnect_interval) if $reconnect_interval;
if($reconnect_interval) {
$self->reconnect_interval($reconnect_interval);
$self->_last_used();
}
return $self;
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment