content: -- This script presumes that you are an OmniFocus user, 
  -- and that you'd like to have a project in OmniFocus for a reading list of articles from NetNewsWire. 
  -- Running this script creates a new task in an OmniFocus project called "NetNewsWire reading list"
  -- with information about the current article.
  
  -- Ideally, the name of the task will be the name of the article, but some articles don't have names
  -- so if there is not name for the article, just use a default string "A NetNewsWireArticle without a title"
  to getTitleOrSomething()
  	tell application "NetNewsWire"
  		set myTitle to the title of the current article
  		if (myTitle is "") then
  			set myTitle to "A NetNewsWireArticle without a title"
  		end if
  	end tell
  end getTitleOrSomething
  
  
  -- Here's where the script starts
  
  -- first get the url and the title of the current article
  tell application "NetNewsWire"
  	set myUrl to the url of the current article
  	set myTitle to my getTitleOrSomething()
  end tell
  
  tell application "OmniFocus"
  	tell document 1
  		
  		-- Second, ensure that the front OmniFocus document has a project called  "NetNewsWire reading list"
  		set names to name of every project
  		if names does not contain "NetNewsWire reading list" then
  			make new project with properties {name:"NetNewsWire reading list"}
  		end if
  		
  		-- lastly, add a task in that project referring to the current article 
  		-- the "Note" field of the task will contain the url for the article
  		tell project "NetNewsWire reading list"
  			make new task with properties {name:myTitle, note:myUrl}
  		end tell
  		
  	end tell
  end tell