attr-delete.tcl