[xyzzy:07321] Re: xyzzy ボールド化計画

["Seiya Suda" <seiya.suda@xxxxxxxxxxx>]

こんにちは、須田です。

すっかり独り相撲を取ってしまいました。
（誰も反応しないのには訳があるのね）

(defvar *text-mode-formats*
  (compile-regexp-keyword-list
   '((".*" nil (:keyword 9)))))

(defun text-mode ()
  (interactive)
  (kill-all-local-variables)
  (setq buffer-mode 'text-mode)
  (setq mode-name "Text")
  (use-keymap *text-mode-map*)
  (use-syntax-table *text-mode-syntax-table*)
  (make-local-variable 'regexp-keyword-list) 　　　　  ;　<----
  (setq regexp-keyword-list *text-mode-formats*)　;　 <----
  (run-hooks '*text-mode-hook*))

これでいいんですね。
なんてこった。

------------------
須田誠也(Seiya Suda)
seiya.suda@xxxxxxxxxxx
http://member.nifty.ne.jp/seiya-suda/