X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy%2FTask%2FSearch.pm;h=73c84976c04aa1e43f4bd2b7140bb166217508f6;hp=8437586176c3644dff47df4f0b9c8cdde13c5e68;hb=3aea44b0ce15e16cb9b40829aaab18b2130bfdfd;hpb=1909336dc6a4d591385775f8f0ebc0bc94e1585d diff --git a/lib/ZOOM/IRSpy/Task/Search.pm b/lib/ZOOM/IRSpy/Task/Search.pm index 8437586..73c8497 100644 --- a/lib/ZOOM/IRSpy/Task/Search.pm +++ b/lib/ZOOM/IRSpy/Task/Search.pm @@ -48,7 +48,10 @@ sub run { my $qstr = $this->{qstr}; $this->irspy()->log("irspy_task", $conn->option("host"), " searching for '$qtype:$qstr'"); - die "task $this has resultset?!" if defined $this->{rs}; + if (defined $this->{rs}) { + $this->set_options(); + die "task $this has resultset?!"; + } my $query; if ($qtype eq "pqf") { @@ -56,6 +59,7 @@ sub run { } elsif ($qtype eq "cql") { $query = new ZOOM::Query::CQL($qstr); } else { + $this->set_options(); die "Huh?!"; } @@ -68,6 +72,7 @@ sub run { eval { $this->{rs} = $conn->search($query); }; if ($@) { + $this->set_options(); die "remote search '$query' had error: '$@'"; }