Barebones script for creating new notes in TB8

Tinderbox Tasks
13

No worries! I sometimes find it faster to paste a clickable “rtf” link to an email right into the text of a Tinderbox note. (Or into Pages or Numbers or another app that accepts rtf.)

tell application "Mail"
	tell first item of (get selection)
		set theHTMLLink to "<a href=\"" & "message://%3C" & its message id & "%3E" & "\">" & its subject & "</a>"
	end tell
end tell
-- convert html to "rtf" link and place on clipboard for pasting wherever
do shell script "echo " & quoted form of theHTMLLink & " | textutil -format html -encoding UTF-8 -convert rtf  -stdin -stdout | pbcopy -encoding UTF-8 -Prefer rtf "

Here it is in a Shortcut pinned in the Menu Bar.

Mail message RTF link to Clipboard

2 Likes