Tuesday, August 18, 2009 at 7:52 PM.

---

godsTweetSuite.navigationMenu

on navigationMenu (accountname) {
	<<Changes
		<<5/1/09; 6:35:58 PM by DW
			<<Cribbed from photoFanWebsite.["#tools"].menu. 
			<<accountname is the name of the account that's highlighted.
	local (htmltext = "", indentlevel = 0);
	on add (s) {
		htmltext = htmltext + string.filledstring ("\t", indentlevel) + s + "\r"};
	on additem (title, thisaccountname, url, fllast=false) {
		add ("");
		if accountname == thisaccountname {
			add ("<b>" + string.upper (title) + "</b>")}
		else {
			add ("<a href=\"" + url + "\">" + title + "</a>")};
		if not fllast {
			add ("|")}};
	additem ("Top-100", "top100", "http://100twt.com/");
	additem ("Twitter", "twitterCorp", "http://twitter.100twt.com/");
	additem ("NYT", "nyt", "http://nyt.100twt.com/");
	additem ("Gang", "gangfan", "http://gang.100twt.com/");
	additem ("Blog", "", "http://www.scripting.com/stories/2009/05/16/followingThePeopleOfTheNyt.html", true);
	return (htmltext)};
bundle { //test code
	webbrowser.displaytext (navigationMenu ("twitterCorp"))}

---

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.