ほんとに些細なことなんだけど eval-buffer でいちいちバッファの名前を聞かれるのがうざい。 カレントバッファ以外を eval-buffer することはめったにないので、インタラクティブに呼ばれたときはカレントバッファを対象とするようにした。 (defvar eval-bu…

find-file でタイプミスして新しいファイルを開いてしまうことがよくある。 そんなときは、ほんとに新しいファイルを開くのかと聞いてほしい。 (defun my-find-file (fn) (interactive "FFind file: ") (cond ((file-exist-p fn) (find-file fn)) ((y-or-n-p…

また古い話しを持ち出して、とうの昔に誰かが結論を出していることを、自分の頭で考えてしまう。 いまさらなんだけど、intel の pentium 系 CPU の拡張命令セットのこと。今までは 「ふーん、なんかよくわからんけど速くなるんだそうな」 くらいにしか思って…

error という関数がある。ヘルプで見てみる。 出た。「例外」だ。なんとなくしか分かってない。うそです。まったく分かっていない(w 試してみる。たとえば、 (defvar a 0) (defun test () (interactive) (error "!!!") ; ここで抜けてる (incf a)) ;; test (…