Fix
Fix したつもり。しかし、ぼくの実験目的でしか使っていない Imap サーバは '.' というセパレータで子供を持てなかったので、sai さんにパッチを送ってためして貰うことにした。
逃避ついでに Meadow 掲示板 もなにか答えようと思ったのだけど、うまく笑いが取れそうもないなぁ。どういう設定方法だと良いのだろうなぁ。
(そういえば言っていなかった)引越しおめでとー。今度窓から手を振って、うちの会社から見えるかどうか実験しよう。
息子が極真会館 坂本道場の春季交流試合の小学校5年中級の部で優勝したぞおぉ〜〜。トーナメントで 5連勝したのは立派、立派。
しかし、中級で優勝しちゃうと次からは上級の試合だから、また、ぼこぼこにされてしまいますな。
ゲーム買うために、帰り道に錦糸町のヨドバシカメラに寄ったので、ついでに ^^;;; 1GByte の SD card を買っちゃった。でへ。物はうーーんと考えて、パワーグローバルインデックス製にしてみました。安いのよりは高いし、安いところよりは高いけど、ポイントだからまぁいいや。
どこかで複数の小容量 SD card を一枚の大容量に取り替えるサービスなんてやっていないかしらん。
    ;; c/migemo はメモリをバカ食いするので、適当に殺す
    (defvar migemo-time nil)
    (defvar migemo-timer nil)
    
    (defadvice migemo-get-pattern (before set-time activate)
      (setq migemo-time (current-time)))
    
    (defun migemo-idle-kill ()
      (when (and migemo-time
    		 (> (time-calc (current-time) migemo-time) 60))
    	(setq migemo-time nil)
    	(migemo-kill)))
    
    (setq migemo-timer (run-with-idle-timer 10 t 'migemo-idle-kill))