Як отримати необмежене повідомлення Mail.app в Автоматизаторі?

Це перехресний пост, тому що я не впевнений, куди він насправді належить. Це питання програмування, але і питання щодо яблука.

Ось посилання stackoverflow: https://stackoverflow.com/questions/17970080/how-to-get-mail-app-raw-message-in-the-automator

Спробуйте:

on run {input, parameters}
    set theSource to {}
    tell application "Mail"
        repeat with aMessage in input
            set end of theSource to aMessage's source & return
        end repeat
    end tell

    return theSource as text
end run