日記みたいな何か

新しくいじってるやつ，XEmacsだと変換候補をインラインで表示した際に色が抜けてしまうことが発覚．変換候補と同じ行に font-lock-comment-faceやfont-lock-string-face，font-lock-keyword-face あたりがついた文字列があると，変換候補が出た瞬間に色が抜け落ちます．が，何故か font-lock-reference-face だけは色が残る模様．なんじゃこりゃ．

試しに after-change-functions を nil にして buffer-substring で切り出してみると，font-lock-reference-face のところは切り出した文字列にもちゃんと色がつくのに，それ以外の場合だと，切り出した文字列に色がついてくれません．うーん．

get-text-propertyで face を引っ張り出してみると，色が切り出されるところは「(font-lock-reference-face)」という風にリストが返ってきています．一方，色が抜けちゃうところは「font-lock-comment-face」とか「font-lock-string-face」みたいにface名(?)が返ってきます．この辺が鍵を握ってるのか？

とりあえず↓みたいなの書いて，変換候補が重なるところのfaceを全部リストに直すようにしてみたら何と色が抜けなくなりました．いいのかこんなんで・・・．ていうか，こんなことばっかやってるからぐちゃぐちゃになるんだよなぁ．

(defun uim-overwrite-font-face (start end)
  (let ((facelist '()) tail face)
    (catch 'face-loop
      (while t
        (setq tail
              (next-single-property-change start 'face (current-buffer) end))
        (if (setq face (get-text-property start 'face))
            (if (atom face)
                (put-text-property start tail 'face 
                                   (cons face nil))))
        (setq start tail)
        (if (= start end)
            (throw 'face-loop t))))
    )
  )

しかし，ほんと，XEmacsでuim.el使ってる人ってどんくらいいるんでしょね・・・．

一応5ボス倒せそうなところまで行けました．でも相変わらず何でもないところで死んだりするのが悲しい・・・．1周はまだ夢のまた夢・・・．

ビューティフル！ PS3買うこと決定ですなー．

海ステージばかりを練習．うーん，ボスが苦しい・・・．

今日のセガダイレクトの表示は今までに無いくらい重い・・・T60にしてから初めてかも．

いきなりC-g押すとfont-lockがおかしくなる問題ですが，あっさり直りました．キー処理まわりは地獄だ．よくこんなんで動いてるな・・・．

もう出てるぅ．

なんか疲れて元気なくなりかけてたんですが，音楽聴いてるうちに落ち着きました．あー，M3は29日なんだよねー．肉の日．

ほんとかよ(笑)．感激した．でもあんまりノシノシやってると急に叩きの流れに入りそうで怖い(;´д`)．まあ，突っ込まれどころいっぱいあるんでしょうがない気もしますが．

ちなみにソース見てないので確証は持てませんが，インライン変換できなくなる(？)ってことはオーバレイ使われちゃってるのが原因ですかねー．オーバレイ，やっぱどうにもならんかなぁ・・・．

今日は uim.elをONにしてると，event-apply-control-modifier がちゃんと動いてくれない問題の方を追ってみました．

うーん，とりあえずEmacs22とEmacs20でScroll_Lock (key-20) を使った C-a，C-x C-f，C-9 a，C-u 100 a 辺りは動作するようになりました．実質修正1行・追加1行か・・・．これでいいのかなぁ．にしてもほんと終わってるコメントだなこれ(;´д`)

--- emacs-20070418/uim-key.el   2007-01-07 02:43:43.000000000 +0900
+++ emacs/uim-key.el    2007-04-18 23:01:05.000000000 +0900
@@ -219,6 +219,7 @@
                     (call-interactively bind)
                     (uim-concat-undo))
                 (setq this-command bind)
+                (setq last-command-char (aref keyvec 0))
                 (command-execute bind)
                 (uim-flush-concat-undo)
                 ))
@@ -568,10 +569,8 @@
                 (setq done t)
                 )
                ((functionp fmap)
-                ;; function: Where should I call this function???
-                ;;   Perhaps, this part doesn't work.
                 (uim-debug (format "function: %s" (vconcat merged-list)))
-                (setq fmap (fmap nil))
+                (setq fmap (funcall fmap nil))
                 (if (vectorp fmap)
                     (setq uim-stacked-key-vector (vconcat stacked-list fmap))

早速入れた！何が変わったんだろ・・・．

うーん，昨日の対策だと C-g 押した際に色がつかなくなる・・・(´・ω・｀)．えーと，どうすりゃいいんだろこれ．

終了かー (´・ω・｀)

とりあえずfont-lock-modeまわりを改善しようといじり始めました．さっそくEmacs-20ではまり．font-lock.elをちまちま読んでみたところ，実はjit-lock-modeとかどうでもよくて，単に after-change-functions と fontification-functions からフック外せばいいという説が．試しに外してみたらバッチリ．速度は・・・うーん，変わった気がせんな(笑)．バッファいっぱい開いてると違ってくるかな．

そういやこんな話も．helperと通信しないオプションとかつけてみますか．

initrd使うのか．なるほど．というわけできちんと入れてみたつもりなんですが，復帰途中と思しきところで，画面がクリアされた後，左上でアンダースコアが点滅し続けてる状態から進んでくれません．うーん，よくわからんなー．