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


on getLinkHtml (adrx) {
		<<6/28/10; 6:37:40 AM by DW
			<<If the outline node pointed to by adrx is a link node, return the HTML that points to what it links at. This code was being replicated all over the place. Better to concentrate it.
	local (adratts = @adrx^.["/atts"], linkicon="");
	if defined (adratts^.type) {
		if adratts^.type == "link" {
			if defined (adratts^.url) {
				local (imgBlueArrow = string (;
				linkicon = " <a href=\"" + adratts^.url + "\">" + imgBlueArrow + "</a>"}}};
	return (linkicon)}

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.