Monday, November 08, 2010 at 12:06 AM.
system.verbs.builtins.tcp.im.callbacks.startup
on startup () {
<<Changes
<<7/30/02; 3:16:32 PM by JES
<<Created. If user.im.prefs.flConnectAtStartup is true, call everyone's startup scripts.
if user.im.prefs.flConnectAtStartup {
local (driverNames = {});
on getDriversFromTable (adrtable) {
local (adr);
for adr in adrtable {
local (name = string.lower (nameOf (adr^)));
if not (driverNames contains name) {
driverNames = driverNames + name;}};
return (true)};
getDriversFromTable (@user.im.drivers);
getDriversFromTable (@tcp.im.builtinDrivers);
local (driver);
for driver in driverNames {
local (adrdriver);
if tcp.im.findDriver (driver, @adrdriver) {
if defined (adrdriver^.startup) {
try {
adrdriver^.startup ()}}}}};
return (true)};
bundle { //test code
startup ()}
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.