source: projects/specs/trunk/s/skk/vine-default-skk.el @ 1701

Revision 1701, 2.1 KB checked in by iwaim, 14 years ago (diff)

skk 13.1-1
Line 
1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2;;  -*- coding: utf-8-unix -*-
3;;  FSF Emacs 23 用 Vine Linux SKK 設定
4;;    Munehiro Yamamoto <munepi@cg8.so-net.ne.jp>
5;;      $Id: vine-default-skk.el,v 1.1 2009/04/23 00:02:56 munepi Exp $
6;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
7
8;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
9;; SKK-9.6m
10;;   Mule 上の仮名漢字変換システム SKK の設定
11;;   C-x t でチュートリアルが起動します
12;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
13
14(if (equal emacs-ime "skk")
15    (progn
16;;;;;;;;;; 使用する辞書の設定 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
17
18;;; SKK-JISYO.L をメモリ上に読み込んで利用する場合
19(setq skk-large-jisyo "/usr/share/skk/SKK-JISYO.L")
20
21;;; SKK-JISYO.M をメモリ上に読み込み、
22;;; 見付からない場合は skkserv を起動して SKK-JISYO.L から検索する場合
23;;; (skkexdic パッケージが必要です)
24;;(setq skk-large-jisyo "/usr/share/skk/SKK-JISYO.M")
25;;(setq skk-aux-large-jisyo "/usr/share/skk/SKK-JISYO.L")
26;;(setq skk-server-portnum 1178)
27;;(setq skk-server-host "localhost")
28;;(setq skk-server-prog "/usr/libexec/skkserv")
29
30;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
31
32(global-set-key "\C-x\C-j" 'skk-mode)
33(global-set-key "\C-xj" 'skk-auto-fill-mode)
34(global-set-key "\C-xt" 'skk-tutorial)
35(autoload 'skk-mode "skk" nil t)
36(autoload 'skk-auto-fill-mode "skk" nil t)
37(autoload 'skk-tutorial "skk-tut" nil t)
38(autoload 'skk-isearch-mode-setup "skk-isearch" nil t)
39(autoload 'skk-isearch-mode-cleanup "skk-isearch" nil t)
40(add-hook 'isearch-mode-hook
41          (function (lambda ()
42                      (and (boundp 'skk-mode) skk-mode
43                           (skk-isearch-mode-setup) ))))
44(add-hook 'isearch-mode-end-hook
45          (function (lambda ()
46                      (and (boundp 'skk-mode) skk-mode
47                           (skk-isearch-mode-cleanup)
48                           (skk-set-cursor-color-properly) ))))
49
50))
51;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
52
53(provide 'vine-default-skk)
54
55;; Local Variables:
56;; mode: emacs-lisp
57;; End:
Note: See TracBrowser for help on using the repository browser.