My Applescripts

Je me sers de NetNewsWire (NNW pour les intimes) comme agrégateur de flux d’actualisation.

j’apprécie l’habitude de certains journaux de servir un premier paragraphe de l’article, le titre seul n’étant pas franchement informatif quant au contenu. Depuis la refonte de son site, Libération, ne donne qu’une phrase, souvent sibylline. Or je n’ai aucune envie de me taper leur pub pour savoir si l’article signalé par NNW est intéressant ou non. D’où ce petit script :

global theurl
tell application “NetNewsWire”
set theurl to URL of selectedHeadline
end tell
tell application “TextCommands” to set printerfriendly to search theurl for “http(.*?)php?.*” replacing with “http”& “\\1″& “php?mode=PRINTERFRIENDLY” with regex
tell application “Firefox” to Get URL printerfriendly
–tell application “URL Access Scripting” to set toto to download printerfriendly to (path to public folder as string) & “libe.html”

Simple : je commence par lire l’URL de l’article, je le transforme pour qu’il corresponde à la page destinée à être imprimée à l’aide de textcommands puis je demande à Frefox de l’ouvrir; il s’ouvre sous un onglet, ce qui correspond à mes réglages de Firefox. Chez moi la ligne commentée est active. Elle importe la page en question à l’aide de URL Access Scripting, dans le dossier Public (je suis partageur); le nom du fichier est libex.txt, ou x un numéro qui s’incrémente automatiquement, d’où le besoin de le ranger dans la variable toto, au cas ou d’autres traitements pourraient être demandés .

Le script est rangé dans le dossier Scripts de NNW et je lui ai associé une combinaison de touches pour éviter à être obligé d’aller le chercher au menu.