Add email body to Things via Rule in Mail.app

mail-to-things

on run {input, parameters}
	
	set todoList to {}
	
	repeat with theMessage in input
		-- Grab message body and sender.
		tell application "Mail"
			set theSender to theMessage's sender as string
			set theMessageBody to theMessage's content as string
		end tell
		
		-- Add to Things.
		tell application "Things"
			set newTodoName to date and " - " and theSender -- set todo name to date and senders name
			set newTodo to make new to do at beginning of project "UAT" -- add to specific project
			set name of newTodo to newTodoName -- name the todo
			set notes of newTodo to theMessageBody -- message body = note of todo item
			set tag names of newTodo to "UAT" -- tag it
			
			-- Add newTodo to the list of todo items.
			set end of todoList to newTodo
		end tell
	end repeat
	
	-- Return list of todo items to process in next action.
	return todoList
end run

The goal is to use this applescript as part of a rule in Mail.app (OS X). It simply doesn't work though. Yosemite, Things 2.5.3.

Thoughts?