From 5e37b75a2546fd3781c60d23dc58da0e666d0a8d Mon Sep 17 00:00:00 2001 From: Mike Taylor Date: Wed, 7 Mar 2007 18:00:15 +0000 Subject: [PATCH] Reconnect before each task. --- lib/ZOOM/IRSpy/Task/Retrieve.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lib/ZOOM/IRSpy/Task/Retrieve.pm b/lib/ZOOM/IRSpy/Task/Retrieve.pm index 095fe02..1022235 100644 --- a/lib/ZOOM/IRSpy/Task/Retrieve.pm +++ b/lib/ZOOM/IRSpy/Task/Retrieve.pm @@ -1,4 +1,4 @@ -# $Id: Retrieve.pm,v 1.3 2006-11-02 16:11:44 mike Exp $ +# $Id: Retrieve.pm,v 1.4 2007-03-07 18:00:15 mike Exp $ package ZOOM::IRSpy::Task::Retrieve; @@ -40,6 +40,8 @@ sub run { $this->set_options(); my $conn = $this->conn(); + $conn->connect($conn->option("host")); + my $rs = $this->{rs}; my $index0 = $this->{index0}; $this->irspy()->log("irspy_task", $conn->option("host"), -- 1.7.10.4