permission-alter.tcl