Monday, November 08, 2010 at 12:01 AM.

---

system.verbs.apps.Eudora.createMessage

on createMessage (whichMailFolder = nil, whichMailBox = nil) {
	with objectModel, Eudora, eventInfo {
		if whichMailFolder == nil {
			whichMailFolder  =  ""};
		if whichMailBox == nil {
			whichMailBox = "Out"};
		return (core.create (id, message, 0, 0, endOf (mailfolder [whichMailFolder].mailbox [whichMailBox])))}}

---

This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.