Skip to content

Instantly share code, notes, and snippets.

@jasonian
Created April 29, 2013 07:42
Show Gist options
  • Save jasonian/5480228 to your computer and use it in GitHub Desktop.
Save jasonian/5480228 to your computer and use it in GitHub Desktop.
Copy selected tasks from OmiFocus to Evernote. No error checking, written for a one-time import. Worked perfectly for my needs.
tell application "OmniFocus"
tell content of first document window of front document
set tasksSelected to value of (selected trees where (class of its value is not item) and (class of its value is not folder))
if length of tasksSelected is 0 then
display alert "Select some tasks in OmniFocus."
return
end if
end tell
repeat with thisTask from 1 to (length of tasksSelected)
tell item thisTask of tasksSelected
set taskName to name
set taskNote to note
-- Create a new entry in Evernote
tell application "Evernote"
create note with text taskNote title taskName notebook "OmniFocus Tasks" tags "added_from_omnifocus"
end tell
end tell
end repeat
end tell
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment