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

---

system.verbs.builtins.tcp.im.builtinResponders.news.script

on script (driverName, screenname, message) {
	local (adrstory = @aggregatorData.stories [random (1, sizeof (aggregatorData.stories))]);
	local (s = adrstory^.channeltitle + ": " + adrstory^.storytext);
	tcp.im.send (driverName, screenName, s)}
<<bundle //test code
	<<dialog.alert (script ("xxx", "news"))

---

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.