Monday, November 08, 2010 at 12:01 AM.
system.verbs.apps.Manila.examples.init
<<This script makes sure that the scratchpad.manilaRpcSettings table required by all the other scripts in the manila.examples table is properly set up. local (adrtable = @scratchpad.manilaRpcSettings); if not defined (adrtable^) { new (tableType, adrtable)}; if not defined (adrtable^.host) { local (s = "weblogs.userland.com"); if not dialog.ask ("Host:", @s) { return (false)}; adrtable^.host = s}; if not defined (adrtable^.port) { local (s = "80"); if not dialog.ask ("Port:", @s) { return (false)}; adrtable^.port = s}; if not defined (adrtable^.rpcPath) { local (s = "/RPC2"); if not dialog.ask ("RPC path:", @s) { return (false)}; adrtable^.rpcPath = s}; if not defined (adrtable^.sitename) { local (s = "manilaRpc"); if not dialog.ask ("Site name:", @s) { return (false)}; adrtable^.sitename = s}; if not defined (adrtable^.username) { local (s = "name@server.com"); if not dialog.ask ("Username:", @s) { return (false)}; adrtable^.username = s}; if not defined (adrtable^.password) { local (s = ""); if not dialog.getPassword ("Password:", @s) { return (false)}; adrtable^.password = s}; return (true)
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.