From 9162b5f8f9e387b793d46a02f9ef980159851807 Mon Sep 17 00:00:00 2001 From: antirez Date: Wed, 18 Jun 2014 15:07:08 +0200 Subject: [PATCH] Test: tcl client, unset deferred var on close. --- tests/support/redis.tcl | 1 + 1 file changed, 1 insertion(+) diff --git a/tests/support/redis.tcl b/tests/support/redis.tcl index a30d1fd6..cc1cbba3 100644 --- a/tests/support/redis.tcl +++ b/tests/support/redis.tcl @@ -105,6 +105,7 @@ proc ::redis::__method__close {id fd} { catch {close $fd} catch {unset ::redis::fd($id)} catch {unset ::redis::blocking($id)} + catch {unset ::redis::deferred($id)} catch {unset ::redis::state($id)} catch {unset ::redis::statestack($id)} catch {unset ::redis::callback($id)}