can't read "info(timeout)": no such element in array
    while executing
"after $info(timeout) [list catch [list unset ::ident::$id]]"
    (procedure "Finish" line 9)
    invoked from within
"Finish $id {error} {SOCKET-ERROR}"
    (procedure "::ident::Write" line 6)
    invoked from within
"::ident::Write sock7 ident2"
can't read "info(timeout)": no such element in array
    while executing
"after $info(timeout) [list catch [list unset ::ident::$id]]"
    (procedure "Finish" line 9)
    invoked from within
"Finish $id {error} {SOCKET-ERROR}"
    (procedure "::ident::Read" line 5)
    invoked from within
"::ident::Read sock7 ident2"

timeout is 5000 and i am using -command, after some time this error appear
