¿Cómo puedo usar AppleScript para decirle a TextEdit que adjunte un archivo?

TextEdit en macOS tiene la capacidad de adjuntar un archivo a un documento de texto enriquecido. Sin embargo, no puedo descubrir cómo invocar la funcionalidad a través de AppleScript. El siguiente AppleScript es lo más lejos que he podido llegar; no produce errores cuando se ejecuta, pero tampoco adjunta un archivo:

tell application "TextEdit"
    activate
    set newDoc to (make new document at beginning of documents)
    set theFile to "/Users/myhome/test.pdf"
    tell newDoc
        make new attachment with properties {file name:theFile as string}
    end tell
end tell

¿Cuál es el código correcto para adjuntar un archivo a un documento RTFD usando AppleScript (preferiblemente sin usar scripts GUI)?