Monday, November 08, 2010 at 12:06 AM.
system.verbs.builtins.webBrowser.utilities.whoIs
case sys.os () { "MacCn"; "MacOS" { local (url = webbrowser.getfrontwindowurl (), s, i); url = url - "http://"; for i = 1 to sizeof (url) { if url [i] == "/" { msg (url [i]); url = string.mid (url, 1, i - 1); break}}; url = url - "www."; if dialog.ask ("Who is?", @url) { netEvents.launch (); s = netEvents.examples.whois (url); webbrowser.displaytext ("<html><body><pre>" + s + "</pre></body></html>")}}}
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.