1 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
2 | ;; -*- coding: utf-8-unix -*- |
---|
3 | ;; FSF Emacs 24 用 Vine Linux Tamago-tsunagi 設定 |
---|
4 | ;; IWAI, Masaharu <iwaim.sub@gmail.com> |
---|
5 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
6 | |
---|
7 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
8 | ;; Egg (Wnn フロントエンド) の設定 |
---|
9 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
10 | |
---|
11 | ;; Wnn6/FreeWnn |
---|
12 | (if (or (equal emacs-ime "wnn") |
---|
13 | (equal emacs-ime "Wnn") |
---|
14 | (equal emacs-ime "wnn6") |
---|
15 | (equal emacs-ime "Wnn6") |
---|
16 | (equal emacs-ime "wnn8") |
---|
17 | (equal emacs-ime "Wnn8")) |
---|
18 | (progn |
---|
19 | |
---|
20 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
21 | ;;emacs-dl-wnnでないときの設定( emacs-21 + tamago v4) |
---|
22 | |
---|
23 | (global-set-key "\C-\\" 'toggle-input-method) |
---|
24 | ;; Shift-Space または 半角/全角 でも起動 |
---|
25 | (global-set-key [?\S-\ ] 'toggle-input-method) |
---|
26 | (global-set-key [zenkaku-hankaku] 'toggle-input-method) |
---|
27 | (load "egg") |
---|
28 | |
---|
29 | ;; InputMethod の設定 |
---|
30 | ;; emacs 起動時 ASCII |
---|
31 | ;;(setq default-input-method "japanese-egg-wnn") |
---|
32 | ;; emacs 起動時から日本語入力 |
---|
33 | (set-input-method "japanese-egg-wnn") |
---|
34 | |
---|
35 | ;; jserverの指定 |
---|
36 | ;; jserver のリストを次の様にして指定できます |
---|
37 | ;;(setq jserver-list '("vanilla" "espresso")) |
---|
38 | (setq jserver-list (list (getenv "JSERVER") "localhost")) |
---|
39 | |
---|
40 | |
---|
41 | ;;-------------------------------------------------------- |
---|
42 | ;; tamago v4 |
---|
43 | ;;-------------------------------------------------------- |
---|
44 | ;; 全般 |
---|
45 | |
---|
46 | ;;(setq egg-default-startup-file "eggrc-wnn") ; 95.6.1 by S.Tomura |
---|
47 | (garbage-collect) |
---|
48 | |
---|
49 | ;; "nn" で「ん」を入力 |
---|
50 | (setq enable-double-n-syntax t) |
---|
51 | |
---|
52 | ;; "." で「.」、"," で「,」を入力。 |
---|
53 | (setq use-kuten-for-period nil) |
---|
54 | (setq use-touten-for-comma nil) |
---|
55 | |
---|
56 | ) |
---|
57 | ) |
---|
58 | |
---|
59 | |
---|
60 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
61 | ;; tamago-anthy の設定 |
---|
62 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
63 | |
---|
64 | (if (or (equal emacs-ime "anthy") |
---|
65 | (equal emacs-ime "Anthy") |
---|
66 | (equal emacs-ime "egg-anthy") |
---|
67 | (equal emacs-ime "tamago-anthy") |
---|
68 | (equal emacs-ime "tamago-tsunagi-anthy")) |
---|
69 | (progn |
---|
70 | (require 'egg) |
---|
71 | (load "tamago-tsunagi/leim-list") |
---|
72 | ;; InputMethod の設定 |
---|
73 | (setq default-input-method "japanese-egg-anthy") |
---|
74 | ;; AnthyとUTF-8で通信する |
---|
75 | (setq anthy-egg-use-utf8 t) |
---|
76 | |
---|
77 | ;; "nn" で「ん」を入力 |
---|
78 | (setq egg-mode-preference t) |
---|
79 | |
---|
80 | ;; "." で「.」、"," で「,」を入力。 |
---|
81 | (setq use-kuten-for-period nil) |
---|
82 | (setq use-touten-for-comma nil) |
---|
83 | |
---|
84 | ;; 候補の最後まで行ったら先頭に戻る |
---|
85 | (setq egg-conversion-wrap-select t) |
---|
86 | |
---|
87 | ;; 候補一覧を表示するまでの変換回数、0で非表示 |
---|
88 | (setq egg-conversion-auto-candidate-menu 2) |
---|
89 | ;; 不正なキーシーケンスを警告する |
---|
90 | (setq its-barf-on-invalid-keyseq t) |
---|
91 | |
---|
92 | |
---|
93 | ;; egg-anthy.el |
---|
94 | (add-hook 'anthy-load-hook '(lambda () (load "egg-anthy"))) |
---|
95 | |
---|
96 | (global-set-key [?\S-\ ] 'toggle-input-method) |
---|
97 | (global-set-key [zenkaku-hankaku] 'toggle-input-method) |
---|
98 | ) |
---|
99 | ) |
---|
100 | |
---|
101 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
102 | |
---|
103 | (provide 'vine-default-tamago-tsunagi) |
---|
104 | |
---|
105 | ;; Local Variables: |
---|
106 | ;; mode: emacs-lisp |
---|
107 | ;; End: |
---|