Add a task from QuickSilver to TaskPaper

A variation of the script from: http://blog.hogbaysoftware.com/post/62679297/quicksilver-to-taskpaper

This version has two enhancements
1) prefixes the entered text with a “-” so that it appears as a task
2) saves the file after adding the task.

To install it: (Full instructions in the link above)
Open Script Editor and paste in the script
Save the script as ~/Library/Application Support/QuickSilver/Actions/TaskPaper.scpt
Restart QuickSilver

using terms from application "Quicksilver"
on process text tasks_text
tell application "TaskPaper"
tell front document
if not (exists project named "Inbox") then
make new project with properties {name:"Inbox"} at front of projects
end if
tell project named "Inbox"
repeat with each in paragraphs of tasks_text
-- Add as a task by prepending with -
set myLine to "- " & each
make new entry with properties {text line:myLine}
end repeat
end tell
end tell
-- Autosave the file
front document save
end tell
end process text
end using terms from

Advertisement