13463: patch for mime.tcl