Clean up the account.tcl script.