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

on readDirectory (xmltext, adrtable) {
		<<11/16/02; 12:27:46 PM by DW
	new (tabletype, adrtable);
	xml.compile (xmltext, @xstruct);
	<<scratchpad.xstruct = xstruct
	local (adrfiles = xml.getAddress (@xstruct, "files"), adr);
	for adr in adrfiles {
		if nameof (adr^) contains "file" {
			local (adrfile = @adrtable^.[adr^.["/atts"].path]);
			new (tabletype, adrfile);
			adrfile^.size = number (adr^.["/atts"].size);
			adrfile^.created = date (adr^.["/atts"].created);
			adrfile^.modified = date (adr^.["/atts"].modified)}}};
bundle { //test code
	local (f = + "files.xml");
	readDirectory (string (file.readwholefile (f)),}

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.