Eu construí um[widget] [1] que pega o URL na janela da frente do Safari e permite abreviá-lo usando a API tr.im. Funciona como doce.

Quero tornar isso mais flexível, por isso estou investigando como obter um URL de outros navegadores. Aqui está o AppleScript que funciona no Safari:

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

Depois dealgumas escavações, Determinei que o seguintepoderia trabalhar para o Firefox (embora uma pessoa tenha me dito que não funciona para ele, possivelmente um conflito com alguma extensão?):

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

Nota: O exemplo acima é um exemplo de prática inferior à melhor, baseando-se na posição dos itens da lista. Veja abaixo uma solução melhor para o Firefox.

O que eu gostaria de fazer é criar aqui uma lista dos equivalentes definitivos para todos os navegadores modernos no Mac: Opera, Camino, Flock, etc.

Atualizar: Em minha pesquisa sobre o assunto, me deparei com um tópico útil sobreMacOSXHints.com. A maioria das minhas respostas abaixo é baseada nessa discussão.

Atualização 2: Eu incorporei o AppleScript nesta página ao [widget] [1]. Parece estar funcionando bem.