X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy.pm;h=0df24d7e18ac8b4bbd246db07bdc9fa709a7413d;hp=870f4dc411a254e6c7de0d5dfba4281274b8d2c1;hb=62f7124810edfb2d19534ea2d88bfbc075b56582;hpb=cc5b8a4f7d904cdd5f78e3b039f778757aebefb6 diff --git a/lib/ZOOM/IRSpy.pm b/lib/ZOOM/IRSpy.pm index 870f4dc..0df24d7 100644 --- a/lib/ZOOM/IRSpy.pm +++ b/lib/ZOOM/IRSpy.pm @@ -1,4 +1,4 @@ -# $Id: IRSpy.pm,v 1.74 2007-03-05 19:45:54 mike Exp $ +# $Id: IRSpy.pm,v 1.75 2007-03-09 08:56:37 mike Exp $ package ZOOM::IRSpy; @@ -330,6 +330,7 @@ sub check { $conn->log("irspy", "has no more tests: removing"); $this->_rewrite_record($conn); $conn->option(rewrote_record => 1); + $conn->destroy(); if (@{ $this->{queue} } == 0) { splice @conn, $i0, 1; } else {