私の.skk(抜粋)
Emacs21、ddskk用です。ぱくってもいいですが、できたらしらせてください。こうするといいよ〜なども歓迎。
; -*- Mode: Emacs-Lisp -*-
; skkの設定
(setq skk-server-host "localhost")
; 色
(setq skk-cursor-abbrev-color "coral4")
(setq skk-cursor-hiragana-color "royalblue")
(setq skk-cursor-katakana-color "forestgreen")
(setq skk-cursor-jisx0208-latin-color "blueviolet")
(setq skk-cursor-latin-color "coral4")
; lookupを使用
(setq skk-search-prog-list
(skk-nunion skk-search-prog-list
'((skk-lookup-search))))
; メッセージを日本語で表示する
(setq skk-japanese-message-and-error t)
; skkservとの通信状況を表示する
(setq skk-server-report-response t)
; 対応する括弧を自動でいれる
(setq skk-auto-insert-paren t)
; 自動ダイナミックコンプリーション
(setq skk-dcomp-activate t)
; 自動変換開始機能
(setq skk-auto-start-henkan t)
; 送り仮名関係
(setq skk-check-okurigana-on-touroku 'ask)
(setq skk-process-okuri-early nil)
(setq skk-henkan-okuri-strictly t)
(setq skk-auto-okuri-process t)
; 日付は西暦でいれる
(setq skk-date-ad t)
(setq skk-number-style 0)
(add-hook 'minibuffer-setup-hook
(function
(lambda ()
(if (and (boundp 'skk-henkan-okuri-strictly)
skk-henkan-okuri-strictly
(not (eq last-command 'skk-purge-jisyo)))
(progn
(setq skk-henkan-okuri-strictly nil)
(put 'skk-henkan-okuri-strictly 'temporary-nil t))))))
(add-hook 'minibuffer-exit-hook
(function
(lambda ()
(if (and (get 'skk-henkan-okuri-strictly 'temporary-nil)
(<= (minibuffer-depth) 1))
(progn
(put 'skk-henkan-okuri-strictly 'temporary-nil nil)
(setq skk-henkan-okuri-strictly t))))))
(C)Copyright 2002 by Sian <sian@big.or.jp>
Last modified: Thu Feb 26 23:03:21 JST 2004