METAREAL

最近、プログラミング関係のまとめやインストール手順の記録といったものには Evernote を利用している（ちなみに、公開しているノートブックは Programming Notes）。

画像中の手書き文字認識や「脳を拡張する」といった誇大広告ばかりが取り沙汰されるサービスだが、単純にメモツールとして優れており、特に Mac クライアントと iPhone クライアントの出来がすばらしい。

SQLite の vacuum コマンドで Mail.app を高速化する。ターミナルで、

% cd ~/Library/Mail/; sqlite3 Envelope\ Index "vacuum;"

Automator で自動化する Mail Vacuum なんてのもある。

個人的には、以下のような AppleScript を、

tell application "Terminal"
  activate
  do script "cd ~/Library/Mail/; sqlite3 Envelope\\ Index \"vacuum;\""
end tell

Optimize Mail.app.scpt として保存し、QuickSilver から実行できるようにしている。

わたしは不器用なので、スクリーンセイバーをホットコーナーから起動しようとするたびに失敗する（スクリーンセイバーが起動したとたんに、微妙にマウスを動かしてしまって、起動が解除されてしまう）。

QuickSilver から起動できたら便利だなと思って、スクリーンセイバーを起動する AppleScript を書いて、~/Library/Scripts/ に置いてある。

tell application "Finder"
  open application file "/System/Library/Frameworks/ScreenSaver.framework/Resources/ScreenSaverEngine.app" as POSIX file
end tell

ホットキーにも登録してみたが、いちいち QuickSilver を起動してタイプする方が性にあっているようだ。

「AppleScript で Markdown 記法のリンクを自動挿入」のスクリプトを更に改良して、選択範囲がない場合は Web ページのタイトルをそのまま挿入するようにした。

tell first document of application "Safari"
  set pageTitle to name
  set pageURL to URL
end tell

tell first document of application "mi"
  set newText to selection as Unicode text
  if (count of newText) = 0 then
    set newText to pageTitle
  end if
  set selection to "[" & newText & "](" & pageURL & " \"" & pageTitle & "\")"
end tell

これでだいぶ楽になったな。

以前の記事「AppleScript で Web ページのタイトルをクリップボードにコピー」を改良して、Markdown 記法でのリンクを自動挿入するようにしてみた（エディタは mi に対応）。

tell first document of application "Safari"
  set pageTitle to name
  set pageURL to URL
end

tell first document of application "mi"
  set selection to "[" & selection & "](" & pageURL & " \"" & pageTitle & "\")"
end

まずは、このスクリプトを mi のツールとして登録。 あとはリンクを貼りたい文字列を選択して、このスクリプトを実行すれば、Safari で開いているページへのリンクが自動的に挿入される、という寸法。

たとえば「mi」という文字列を選択して、mi のページを Safari で開いている場合は、

[mi](http://www.mimikaki.net/ "mi")

というリンクが自動挿入される。