message-attach.tcl