URL’s inkorten door middel van Automator

Dankzij de opkomst van voornamelijk Twitter zijn short URL's niet meer weg te denken van het internet (of we daar nou blij mee zijn of niet). Om het inkorten van URL's makkelijk te maken zijn er verschillende bookmarklets beschikbaar, ook Twitter zelf heeft er één.

Deze bookmarklets maken het vanuit de webbrowser mogelijk om een URL in te korten en deze direct te delen, heel erg handig, maar wat als je buiten je browser even snel een URL in wilt korten? Dankzij een simpel Automator script is dit een fluitje van een cent en is het mogelijk om vanuit alle applicaties een URL in te korten.

Maak om te beginnen een nieuwe voorziening aan in Automator en geef aan dat de voorziening de geselecteerde URL's ontvangt in alle programma's. Selecteer ook de checkbox voor "Vervangt geselecteerde tekst".

Sleep vervolgens de taak "Voer AppleScript uit" van de takenlijst naar de rechter kant van het Automator scherm. Kopieer vervolgens onderstaande script in deze taak.

on run {input, parameters}
  set dlstring to ((path to temporary items folder as string) & "shortURL.html")
  tell application "URL Access Scripting"
    download ("http://bit.ly/api?url=" & (item 1 of the input)) to dlstring replacing yes
  end tell
  set x to open for access dlstring
  set aurl to read x
  close access x
  return aurl
end run

Sla deze voorziening nu op (⌘cmd+s) onder een herkenbare naam, bijvoorbeeld: "Kort URL in". Als je vanaf nu een URL selecteert en hier met de rechtermuisknop op klikt kun je via het menu "Voorzieningen" de URL inkorten.

Dit script maakt gebruik van de API van bit.ly, je kunt hier echter ook een andere service voor gebruiken. Zolang je er maar voor zorgt dat het API format klopt (http://short.url/api?url=http://website.nl/).