- 357 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/06/05(金) 23:20:32 ID:t803Rolz0]
- キーワードハイライトに lisp-keywords.l を使っていると
予想してみた。
使っていなかったら、*lisp-keyword-hash-table* も定義
して mode-hook に引っかけてみて。
;; 追加
(defvar *lisp-keyword-hash-table2* nil)
;; 上書き
(defun use-lisp-keyword ()
(let ((type (and (get-buffer-file-name)
(pathname-type (get-buffer-file-name)))))
(when *lisp-keyword-highlight*
(make-local-variable 'keyword-hash-table)
(if (string-equal "lisp" type)
(setq *lisp-keyword-hash-table2*
(or *lisp-keyword-hash-table2*
(load-keyword-file "lispa"))
keyword-hash-table *lisp-keyword-hash-table2*)
(setq *lisp-keyword-hash-table*
(or *lisp-keyword-hash-table*
(load-keyword-file "lisp"))
keyword-hash-table *lisp-keyword-hash-table*)))))
|
 |
