AppleScript - "Cerrar pestañas a la derecha de la pestaña actual" en Safari 7

He estado usando el AppleScript a continuación como un servicio de Automator para que Safari cierre todas las pestañas a la derecha de la pestaña actual. Sin embargo, actualicé a Mavericks (10.9) y descubrí que esto ya no funciona.

¿Alguien puede aconsejar cómo se debe cambiar este AppleScript para que funcione nuevamente?

Aquí está el guión:

    tell application "Safari"
  set indexActive to index of current tab of window 1
    repeat until (get index of last tab of window 1) = indexActive
        close last tab of window 1
    end repeat
end tell
¿Puedes poner el código en la pregunta y no en un sitio externo?

Respuestas (1)

Su secuencia de comandos aún funcionó en mis pruebas limitadas, pero también podría intentar algo como esto:

tell window 1 of application "Safari"
    close (tabs where index > (get index of current tab))
end
Extraño. Comenzó a funcionar de nuevo una vez que hice un reinicio. ¡Y gracias por el guión alternativo conciso!