Criando um serviço do Automator para adicionar mensagens de email ao Reminders.app

Eu criei um serviço do Automator que cria um lembrete com base no texto selecionado. O que eu realmente quero é criar um atalho de teclado que obtenha o mesmo resultado arrastando um email para o Reminders.app.

O serviço que acabei de usar usa o texto para criar o título do lembrete, mas quando você arrasta um email para Reminders.app, ele usa o assunto do email como título e adiciona um link ao email.

Existe uma maneira de criar um atalho de teclado para esta ação ou um serviço do Automator?

Não tenho o atalho do teclado, mas acabei de terminar um Actionscript que adiciona o Assunto do email como Título do Lembrete, o Corpo do email como Conteúdo do Lembrete e, em seguida, adiciona um link para o email real na parte inferior do Lembrete. Espero que isto ajude!

on run {input, parameters}
tell application "Calendar" to activate
tell application "Calendar"
    set miniaturized of window 1 to true
    tell application "Mail"
        set theSelection to selection
        set theMessage to item 1 of theSelection
        set theurl to "message://%3c" & theMessage's message id & "%3e"
        set thedes to theMessage's content & "Show in Mail " & "message://%3c" & theMessage's message id & "%3e"
        set input to theMessage's subject
    end tell
end tell
tell application "Calendar"
    tell calendar "Reminders"
        make new todo at end with properties {url:theurl, summary:input, description:thedes}
        tell application "Reminders" to activate
    end tell
end tell
return input

corrida final

Você pode criar um atalho para um serviço. Em Preferências do Sistema, Teclado e Mouse, Atalhos do Teclado: adicione um novo atalho para Todos os Aplicativos (se você quiser usá-lo em qualquer lugar). Certifique-se de corresponder exatamente ao texto do menu de serviços, incluindo maiúsculas e minúsculas.

Consegui criar um serviço que executa um AppleScripts e pode ser ativado com um atalho de teclado.

Primeiro, adiciono a ação Get Selected Mail Messages com as mensagens selecionadas nas opções. Em seguida, usei a ação Executar AppleScript com o seguinte AppleScript:

on run {input, parameters}

tell application "Mail"
    set _sel to selection
    set _links to {}

    set the _message to item 1 ¬
        of the _sel
    set theSubject to subject of _message
    set message_id to the message id of the _message
end tell

set message_url to "message://%3c" & message_id & "%3e"
set end of _links to message_url
set the clipboard to (_links as string)

set theBody to the clipboard

tell application "Reminders"
    set theReminder to make new reminder with properties {name:theSubject, body:theBody, priority:1}

end tell

return input

corrida final

Isso não adiciona o corpo do email a Reminders.app, mas usa o assunto como título do lembrete e adiciona um link à mensagem de email no campo de nota do lembrete.

Reuni as respostas deste tópico e de outros lugares em um fluxo de trabalho "Lembrete de resposta por e-mail", que define um lembrete para responder a um e-mail, no github aqui