cdif in Emacs

Emacs のバッファに cdif を実行するための関数を作りました。 cdif のリポジトリcdif.el として置いてあるのでどうぞ。

これは、今作業中の翻訳原稿。 以前の版から類似の文章を選択して、原文の diff と、古い訳文を挿入してある。 このバッファに対して cdif-buffer を実行すると、diff 出力部分を cdif コマンドで処理して、結果に ansi-color を使って着色します。

f:id:uta46:20140403170919p:plain

スコアは100点満点で、文章を単語に分解して、すべての単語が同じ場所にあれば100点。 同じ単語があって、順番が違うと、その差の分だけ減点するというアルゴリズムです。 実は、これは利き酒と同じ方法。

Emacs lisp なんて書くのは10年以上ぶり。 コマンドの実行に失敗した時の処理がわかりません。 誰か教えて_o_

Emacs のバッファに対して cdif を実行する関数。