presentation-revert-2.tcl