Serious Eats Ingredient Lists to OmniFocus

se-list-to-of.applescript

tell application "Safari" to set ingredientlist to text of front document

set my text item delimiters to "
Ingredients"
set ingredientlist to text item 2 of ingredientlist
set my text item delimiters to "
Procedures"
set ingredientlist to text item 1 of ingredientlist

set l to paragraphs of ingredientlist

tell application "OmniFocus" to tell document 1
	repeat with v in l
		set theproject to (first flattened project where its name = "Recipes")
		tell theproject to make new task with properties {name:v}
	end repeat
end tell

se-recipe-name-to-task.applescript

tell application "Safari"
	set TaskName to name of current tab of window 1
	set TaskNote to "From: " & URL of current tab of window 1
end tell

tell application "OmniFocus" to tell document 1
	set theproject to (first flattened project where its name = "Recipes")
	tell theproject to make new task with properties {name:TaskName, note:TaskNote}
end tell