issue-close.tcl