Monday, November 08, 2010 at 12:06 AM.
system.verbs.builtins.webBrowser.openURL
on openURL (s, openURLIn=nil) {
<<Changes
<<6/8/06; 7:06:45 AM by DW
<<If it's Firefox on Windows, add a blank to the end of the URL to work around a bug in their DDE implementation. For background see the comments on this post.
<<http://support.opml.org/2006/06/08#a1124
local (id = webBrowser.launch ());
if id == false or id == 'NONE' {
return (false)};
case sys.os () {
"MacOS" {
return (appleEvent (id, 'GURL', 'GURL', '----', string (s), 'cwin', openUrlIn))};
"Win95";
"WinNT" {
if string.lower (id) contains "netscape" {
return (webBrowser.callBrowser (id, "WWW_OpenURL", s + ",,-1"))};
if string.lower (id) contains "firefox" {
s = s + " "};
return (webBrowser.callBrowser (id, "WWW_OpenURL", s))}}}
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.