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


on synch (adrsource, adrdest) {
		<<6/27/08; 3:23:48 PM by DW
			<<Don't overwrite if the mod date on the source is less than or equal to the mod date on the dest.
		<<6/27/08; 11:41:45 AM by DW
			<<Created. Synchronize the dest with the source. We don't delete objects that exist in the dest that aren't in the source, so it's sort of an inclusive synch.
	local (adrs, adrd);
	for adrs in adrsource {
		local (name = nameof (adrs^), adrd = @adrdest^.[name], flcopy = true);
		if defined (adrd^) {
			if timemodified (adrs) <= timemodified (adrd) {
				flcopy = false}};
		if flcopy {
			adrd^ = adrs^}
		else {
			if typeof (adrs^) == tabletype { //recurse
				table.synch (adrs, adrd)}}}}
<<bundle //test code
	<<synch (, @techJunkWebsite)

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.