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

---

lifeLinerSuite.menuCommands.addEnclosure

on addEnclosure () {
	<<Changes
		<<7/18/09; 11:09:28 AM by DW
			<<Created. 
	local (adrdata = lifelinersuite.init ());
	if dialog.ask ("Enclosure URL?", @adrdata^.prefs.lastEnclosureUrl) {
		local (atts);
		new (tabletype, @atts);
		atts.type = "link";
		atts.hint = "enclosure";
		atts.url = adrdata^.prefs.lastEnclosureUrl;
		tcp.httpGetTypeLength (atts.url, @atts.enclosureType, @atts.enclosureLength, ctFollowRedirects:5);
		op.attributes.addgroup (@atts)}};
bundle { //test code
	addEnclosure ()}

---

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.