使用AppleScript从Web浏览器中最前面的窗口中获取URL:最终列表

我构建了一个[widget] [1],它从Safari中最前面的窗口抓取URL,然后允许你使用tr.im API缩短它.工作甜美如.

我想让它更灵活,所以我正在研究如何从其他浏览器中获取URL.这是在Safari中运行的AppleScript:

tell application "Safari"
    return URL of front document as string
end tell

经过一番挖掘后,我确定以下内容可能适用于Firefox(虽然有人告诉我它对他不起作用,可能与某些扩展冲突？):

tell application "Firefox"
    set myFirefox to properties of front window as list
    return item 3 of myFirefox
end tell

注意:上面是一个不太好的做法的例子,依赖于列表项的位置.请参阅下面的Firefox更好的解决方案.

我想做的是在这里建立一个列表,列出Mac上每个现代浏览器的最终等价物:Opera,Camino,Flock等.

更新:在我对这个主题的研究中,我在MacOSXHints.com上遇到了一个有用的主题.我下面的大部分答案都是基于这个讨论.

更新2:我已将此页面上的AppleScript合并到[widget] [1]中.它似乎工作膨胀.