eliminate tk_wrapper
fix tcl_result call at startup