Test: tcl client, unset deferred var on close.

This commit is contained in:
antirez 2014-06-18 15:07:08 +02:00
parent 36bbfeef7b
commit 9162b5f8f9

View File

@ -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)}