Tcl/Tk отправка электронной почты с smtp и mime с вложениями, не отображающими прикрепленное имя файла

Question

Я могу отправлять электронные письма с помощью smtp и mime с вложением, но когда я читаю письмо, у прикрепленного файла нет имени.

Мой код выглядит следующим образом:

      set messageT [mime::initialize -canonical text/plain      -string $TEXT]

set pdfT     [mime::initialize -canonical application/pdf -file $PDFATT]

set tok [mime::initialize -canonical multipart/mixed -parts [list $pdfT $messageT]]

smtp::sendmessage $tok -servers [list $gVar(smtp,SERVER)] -ports [list $gVar(smtp,PORT)] -usetls 1 -username $gVar(smtp,USERNAME) -password $gVar(smtp,PASSWORD) -header [list From "$FROM"] -header [list To "$TO"] -header [list Subject "$SUBJECT"] -header [list Date "[clock format [clock seconds]]"]    

mime::finalize $tok -subordinates all

Любая помощь будет очень признательна.

Большое спасибо...