Artifact
f2dc403ba00adeb1d9e2a1d380cb2673238be9e21c3c875d8dd18a149cbfcc27:
Attachment "patch.txt" to
ticket [21e22313d8]
added by
aparvu
2018-06-05 11:35:24.
(unpublished)
--- websocket.tcl 2018-06-05 07:27:52.000000000 -0400
+++ websocket_patched.tcl 2018-06-05 07:30:51.000000000 -0400
@@ -117,7 +117,7 @@
set varname [namespace current]::Connection_$sock
upvar \#0 $varname Connection
- if { $Connection(liveness) ne "" } {
+ if { [info exists Connection(liveness)] && $Connection(liveness) ne "" } {
after cancel $Connection(liveness)
}
Push $sock disconnect "Disconnected from remote end"
