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.