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

system.verbs.builtins.html.utilities.convertclayglossary

local (adrtable = @clay.data.glossary);
local (ct = sizeof (adrtable^), i, s);
for i = 1 to ct {
	local (adrsubtable = @adrtable^ [i]);
	local (name = nameof (adrsubtable^));
	msg (name);
	with adrsubtable^ {
		case t {
			0 {
				s = v};
			1 {
				s = "<a href=\""+ v + "\">" + name + "</a>"};
			2 {
				s = "<a href=\"mailto:"+ v + "\">" + name + "</a>"}}
		else {
			scriptError ("Unsupported glossary type, number = " + t)}};
	user.html.glossary.[name] = s}



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.