Tk Library Source Code

Artifact e74c56c749af96a9260cdef6b6210887c0897526:

Attachment "patch_ftp.tcl_1.43" to ticket [1582535fff] added by hofkensg 2006-10-23 04:13:27.

---

279c279,281
<             
---
>             catch {read $ftp(CtrlSock); close $ftp(CtrlSock)}
>             catch {unset ftp(CtrlSock)}
>             catch {unset ftp(state.data)}
291d292
<             catch {close $ftp(CtrlSock); unset ftp(CtrlSock)}