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.