[9542] | 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: |
---|