X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy%2FTask%2FConnect.pm;h=117f06203953a183c366ff76734e2b372641036c;hb=8d22b67928c9e2d65e90308dd7560dcd1d4d797a;hp=ba73cd40529bbdd64c9cb4a61aefe43ac20b2c0a;hpb=5a61be14a41e45b072d974f16df805c61f9eb7f3;p=irspy-moved-to-github.git diff --git a/lib/ZOOM/IRSpy/Task/Connect.pm b/lib/ZOOM/IRSpy/Task/Connect.pm index ba73cd4..117f062 100644 --- a/lib/ZOOM/IRSpy/Task/Connect.pm +++ b/lib/ZOOM/IRSpy/Task/Connect.pm @@ -1,4 +1,3 @@ -# $Id: Connect.pm,v 1.3 2006-10-12 16:54:13 mike Exp $ # See ZOOM/IRSpy/Task/Search.pm for documentation @@ -20,9 +19,15 @@ sub new { sub run { my $this = shift(); + $this->set_options(); + my $conn = $this->conn(); $conn->log("irspy_task", "connecting"); $conn->connect($conn->option("host")); + warn "no ZOOM-C level events queued by $this" + if $conn->is_idle(); + + $this->set_options(); } sub render {