ブログの作成環境をメインマシンの iMac から出張用の iBook に移行しました。iBook ではブログを巡回するのに RSS リーダ『sage』を使っていますので、ブログの作成にも Firefox を使いたい…

参考にさせていただいたのは以下のページです。

MacScripter BBS | Applescript Forums :: View topic - Firefox window title

で、できたスクリプトがこれ。

tell application "Firefox"
 set the_title to «class pTit» of window 1
 set the_uri to «class curl» of window 1
 set the clipboard to "<*a href=¥"" & the_uri & "¥" title=¥"『" & the_title & "』へのリンクをこのウインドウで開く¥">" & the_title & "</a>"
end tell

『«』『»』はそれぞれ、『option + ]』『option + shift + ]』で入力できます。

Firefox で開いているページのタイトルと URI が

<*a href="{URI}" title="『{タイトル}』へのリンクをこのウインドウで開く">{タイトル}</a>

のかたちでクリップボードに納められますので、そのまま iBlog にペーストできます。

私は文章全体を <HTMLCode>~</HTMLCode> でくくっていますので、上記のスクリプトでいいのですが、アンカータグ部分だけに <HTMLCode>~</HTMLCode> 使いたい場合は４行目を

 set the clipboard to "<HTMLCode><*a href=¥"" & the_uri & "¥" title=¥"『" & the_title & "』へのリンクをこのウインドウで開く¥">" & the_title & "</a></HTMLCode>"