update tcl/tk line