From 6cd08dbbb180c999e27df9c6b4295feefbfd5177 Mon Sep 17 00:00:00 2001 From: Andrew Yates <ayates@ebi.ac.uk> Date: Wed, 15 Aug 2012 13:22:33 +0000 Subject: [PATCH] Need to record the construction of the object is the last time we used it --- modules/Bio/EnsEMBL/DBSQL/ProxyDBConnection.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/modules/Bio/EnsEMBL/DBSQL/ProxyDBConnection.pm b/modules/Bio/EnsEMBL/DBSQL/ProxyDBConnection.pm index a8b0b6990b..948d7d94ec 100644 --- a/modules/Bio/EnsEMBL/DBSQL/ProxyDBConnection.pm +++ b/modules/Bio/EnsEMBL/DBSQL/ProxyDBConnection.pm @@ -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; } -- GitLab