Créer/modifier rapidement des raccourcis clavier pour les éléments de menu

Voici l'AppleScript pour ça :

on run

tell application "System Events"
    set theActiveApp to name of 1st process whose frontmost is true
end tell

set theApplicationID to id of application theActiveApp
set theMenuItem to text returned of (display dialog "Enter menu item name" default answer "Example: New Window")
set theShortcut to text returned of (display dialog "Enter shortcut (use these: =@,  =~,  =$,  ^=^)" default answer "Example: @$1")

do shell script "defaults write " & quoted form of theApplicationID & " NSUserKeyEquivalents -dict-add " & quoted form of (quote & theMenuItem & quote) & " " & quoted form of (quote & theShortcut & quote)

end run

Il récupère donc l'identifiant de l'application en cours, puis ajoute le nom de l'élément de menu et le raccourci, le cas échéant. Vous pouvez même cliquer sur la barre de menu de l'application sans que la fenêtre contextuelle ne disparaisse !

Cependant, Notez que ceci n'est qu'une version rudimentaire de ce que vous vouliez ; il ne fait qu'ajouter des entrées. Si vous faites une erreur, c'est à vous de la corriger manuellement (et cela pourrait ne pas apparaître dans les préférences système). Enfin, il ne semble pas fonctionner dans Automator ou script Editor, mais fonctionne bien pour le Finder. En ce qui concerne les deux premiers, il ajoute les entrées mais, pour une raison quelconque, elles n'apparaissent pas dans les Préférences Système et ne peuvent pas être utilisées, même après avoir redémarré l'application. Je ne sais pas pourquoi mais au moins, c'est quelque chose ;)