本日の変更点

今日の成果。モードラインフォーマット変更を限定的にした。っていうかこれは最初から探しとくべきだった…

--- ht.l.0417   Fri Apr 17 14:56:01 2009
+++ ht.l        Mon Apr 20 11:53:16 2009
@@ -66,6 +66,7 @@
          ;; Change mode-line title from Diary
          (let* ((title (xml-title head)))
                (msgbox "~A" title)
+               (make-local-variable 'mode-line-format)
                (setq mode-line-format (format nil "%b - ~A" (cdr title))))
          (update-mode-line)
          )