And, since MarsEdit is scriptable, it would certainly be possible to write a script that would take the rich text of a Journal entry and transfer it to MarsEdit and send it. I don't have a blog (though I do have MarsEdit) so I can't do it, having no way to test it.
on run
tell application \"Journler\"
set curNote to selected entries of tib 1 of window 1
set nrOfItems to number of items of curNote
repeat with ll from 1 to nrOfItems
set msgTitle to name of item ll of curNote
set msgText to rich text of item ll of curNote
my makeMarsEditPost(msgTitle, msgText)
end repeat
end tell
end run
on makeMarsEditPost(postTitle, postContent)
tell application \"MarsEdit\"
activate
make new post window
tell post window 1
set title to postTitle
set body to postContent
end tell
end tell
end makeMarsEditPost
Daniel said:I'm glad you found this script - it looks like a great aid - one thing I would change is the line:
set msgText to rich text of item ll of curNote
Instead of asking for the rich text of the item, it should ask for the "html text":
set msgText to html text of item ll of curNote
The reason is that MarsEdit it not a "rich text" editor ... so ironically the richness of the text will be accurately preserved only by sending the HTML text to it.
tell application \"Mori\"
set postTitle to name of current entry
set postBody to note of current entry
end tell
tell application \"MarsEdit\"
activate
make new post window
tell post window 1
set title to postTitle
set body to postBody
end tell
end tell
It looks like you're new here. If you want to get involved, click one of these buttons!