*Backtrace*

_ ダメ人間

* TODO ためすぎ

何やってんだろう、私。

* LOVE FIRE ループ

ひさびさにやってみる。

* 自己嫌悪モード

結局これだ。進歩しないなぁ、私も。とりあえず寝る。

_ F405 で昼飯

KDDとか魔法の三輪馬車のお話を伺いました。メール出さなきゃ。

_ ビビる

心当たりはないけど。

* WL

私はマニュアルをメンテナンスしていて「こんな機能もあったんだ」と発見することも多いですね。

ちょっとでも疑問が生じたら、実装をチェックする必要に迫られるので勉強にもなる。

_ .emacs

copyright 表示に 2000 を追加。せっかくなので init*.el を置いてみた。流れは以下の通り。

1. .emacs からinit.elを require。
2. init.el から SITENAME.el を require。
3. SITENAME.el から必要な init-*.el を load。

ついでに、オススメ設定。

* .saves-*

こうすると散らからなくて便利。

 (setq auto-save-list-file-prefix "~/.saves/")

* region と paren のハイライト

XEmacs は使っていないので正常動作するか不明。

 ;; paren
 (static-cond
  ((fboundp 'paren-set-mode)		; XEmacs
   (paren-set-mode 'paren))
  ((fboundp 'show-paren-mode)		; FSF
   (show-paren-mode t)))
 ;; emacs -rv
 (defvar reverse-video-p
   (eq 'dark (cdr (assq 'background-mode (frame-parameters))))
   "t means background-mode is 'dark.")
 ;; region inverse video
 (static-when (boundp 'transient-mark-mode)
   (setq transient-mark-mode t)
   (set-face-foreground 'region nil)
   (if reverse-video-p
       ()
     (set-face-background 'region "light blue")))