From b5e602a6562b02ae4beb578a2a630aa33104cfea Mon Sep 17 00:00:00 2001 From: Mike Taylor Date: Fri, 9 Mar 2007 08:56:37 +0000 Subject: [PATCH] Explicitly destroy() connections when they're closed, thereby freeing resources used by the underlying ZOOM-C object. --- lib/ZOOM/IRSpy.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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 { -- 1.7.10.4