An AppleScript to use with Alfred.app to create a new Trac ticket by email

send-trac-ticket.applescript

on alfred_script(q)
  tell application "Mail"
	set myMessage to make new outgoing message with properties {visible:true, subject: q}
	set message signature of myMessage to signature "trac"
	tell myMessage
		make new to recipient with properties {name:"Trac", address:"ticket@example.com"}
	end tell
activate
end tell
end alfred_script