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.