From: Mike Taylor Date: Wed, 25 Oct 2006 10:54:43 +0000 (+0000) Subject: Call ->set_options() X-Git-Tag: CPAN-v1.02~54^2~866 X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=commitdiff_plain;h=ae94c0308147f8c8db1cd9aafc7ba6c24de2e42d Call ->set_options() --- diff --git a/lib/ZOOM/IRSpy/Task/Connect.pm b/lib/ZOOM/IRSpy/Task/Connect.pm index ba73cd4..4c46053 100644 --- a/lib/ZOOM/IRSpy/Task/Connect.pm +++ b/lib/ZOOM/IRSpy/Task/Connect.pm @@ -1,4 +1,4 @@ -# $Id: Connect.pm,v 1.3 2006-10-12 16:54:13 mike Exp $ +# $Id: Connect.pm,v 1.4 2006-10-25 10:54:43 mike Exp $ # See ZOOM/IRSpy/Task/Search.pm for documentation @@ -20,6 +20,8 @@ sub new { sub run { my $this = shift(); + $this->set_options(); + my $conn = $this->conn(); $conn->log("irspy_task", "connecting"); $conn->connect($conn->option("host")); diff --git a/lib/ZOOM/IRSpy/Task/Search.pm b/lib/ZOOM/IRSpy/Task/Search.pm index d9184be..e3db632 100644 --- a/lib/ZOOM/IRSpy/Task/Search.pm +++ b/lib/ZOOM/IRSpy/Task/Search.pm @@ -1,4 +1,4 @@ -# $Id: Search.pm,v 1.3 2006-10-12 16:54:13 mike Exp $ +# $Id: Search.pm,v 1.4 2006-10-25 10:54:43 mike Exp $ package ZOOM::IRSpy::Task::Search; @@ -36,6 +36,8 @@ sub new { sub run { my $this = shift(); + $this->set_options(); + my $conn = $this->conn(); my $query = $this->{query}; $this->irspy()->log("irspy_task", $conn->option("host"),