fix tclX