Defer 1 Week
Summary: Changes the Defer Until date of the selected actions to 1 week in the future.
Requires: OmniFocus Pro
Install Location: ~/Library/Scripts/Applications/OmniFocus/
Last Modified: 2026-01-14
Description
This script changes the Defer Until date of the selected actions to midnight a week later (if there was no defer date) or the same time a week later (if there was already a defer date).
Installation Instructions · Download in Compiled Format · Download in Text Format
Script
on run {}
repeat with _action in my selectedActions()
my processAction(_action)
end repeat
end run
on ()
tell application "OmniFocus"
return my filterValues(my selectedValues(), {inbox task, task, available task, remaining task})
end tell
end selectedActions
on ()
tell application "OmniFocus"
return value of selected trees of content of first document window of front document
end tell
end
on (_values, _classes)
tell application "OmniFocus"
set _result to {}
repeat with _value in _values
if contains _value's class then
copy _value to end of _result
end if
end repeat
return
end tell
end
on (_action)
tell application "OmniFocus"
set _action's defer date to my calculateDate(_action's defer date)
end tell
end processAction
on (_oldDate)
if _oldDate is missing value then
return my midnightTomorrow()
else
return (my midnightTomorrow()) + (time of _oldDate)
end if
end calculateDate
on ()
set _date to current date
set of _date to ((_date's day) + 7)
set time of _date to 0
return _date
end