Quote:
Originally Posted by hypotyposis
after having implemented a long folder hierarchy representing my areas of responsibility ... I'm going to dispense with my folders (right now I'm keeping Work/Personal, but I plan to do away with that soon as well).
|
There is a cost to folders (visual clutter, and the need to drill down), but, as is suggested by your hesitation over dropping the Work / Personal folders, there is a value too.
I find that you can get the best of both worlds by keeping folders but being able to click a button which hides the folder hierarchy completely, and just shows a flat list of all your projects.
This is the script I use, and it can be fine-tuned ...
Code:
-- Hide folder hierarchy and display a flat list of all projects
tell application "OmniFocus"
set oDoc to default document
set lstProjects to my ProjectList(oDoc)
set focus of front document window of oDoc to lstProjects
end tell
on ProjectList(oParent)
using terms from application "OmniFocus"
tell oParent
-- ADJUST THE WHERE QUERIES TO MATCH
--THE TYPE OF PROJECTS YOU WANT TO LIST
set lstProjects to projects where (status is active) or (status is on hold)
set lstFolders to folders where hidden is false
end tell
repeat with oFolder in lstFolders
set lstProjects to lstProjects & my ProjectList(oFolder)
end repeat
return lstProjects
end using terms from
end ProjectList