Saturday, April 02, 2011 at 9:18 PM.


on getCurrentSeed (hosename) {
		<<9/25/10; 7:10:44 PM by DW
			<<The seed is a string that effectively points to the last place in the stream of news items. It's like a bookmark. 
	local (adrdata = feedHoseSuite.inithose (hosename), seed);
	bundle { //set adrlastitem
		local (nomad = @adrdata^.calendar);
		nomad = @nomad^ [sizeof (nomad^)]; //last year
		seed = nameof (nomad^);
		nomad = @nomad^ [sizeof (nomad^)]; //last month
		seed = seed + "-" + nameof (nomad^);
		nomad = @nomad^ [sizeof (nomad^)]; //last day
		seed = seed + "-" + nameof (nomad^);
		nomad = @nomad^ [sizeof (nomad^)]; //last item
		seed = seed + "-" + nameof (nomad^)};
	return (seed)};
bundle { //test code
	dialog.alert (getCurrentSeed ("nytimes"))}

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.