Update controller.tcl