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

---

system.verbs.builtins.radio.outliner.expireImRegistrations

on expireImRegistrations () {
	<<Changes
		<<8/27/02; 2:21:27 AM by JES
			<<Created. Expire all IM-based notifications after 24 hours.
	local (yesterday = date.yesterday (clock.now ()));
	local (adrdata = radio.outliner.init ());
	local (adr, ct = sizeOf (adrdata^.subscribers));
	for i = ct downto 1 {
		adr = @adrdata^.subscribers[i];
		if adr^.whenSubscribed < yesterday { //expired
			delete (adr)}};
	return (true)};
bundle { //test code
	expireImRegistrations ()}

---

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.