1 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
2 | ;; -*- coding: utf-8-unix -*- |
---|
3 | ;; FSF Emacs 23 用 Vine Linux ibus-el 設定 |
---|
4 | ;; IWAI, Masaharu <iwai@alib.jp> |
---|
5 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
6 | |
---|
7 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
8 | ;; ibus-el の設定 |
---|
9 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
10 | |
---|
11 | (if (or (equal emacs-ime "ibus-el") |
---|
12 | (equal emacs-ime "IBus-el")) |
---|
13 | (progn |
---|
14 | (require 'ibus) |
---|
15 | |
---|
16 | ;; Turn on ibus-mode automatically loading after-vine-default-setup-hook |
---|
17 | (add-hook 'after-vine-default-setup-hook 'ibus-mode-on) |
---|
18 | |
---|
19 | ;; define ibus-el-agent path |
---|
20 | (setq ibus-agent-file-name "/usr/share/ibus-el/ibus-el-agent") |
---|
21 | |
---|
22 | ;; Use C-SPC for Set Mark command |
---|
23 | (ibus-define-common-key ?\C-\s nil) |
---|
24 | |
---|
25 | ;; Toggle input status by Ctrl + \ |
---|
26 | (global-set-key "\C-\\" 'ibus-toggle) |
---|
27 | |
---|
28 | ;; Use henkan key to enable IBus |
---|
29 | (global-set-key [henkan] 'ibus-enable) |
---|
30 | ;; Use muhenkan key to disable IBus |
---|
31 | (global-set-key [muhenkan] 'ibus-disable) |
---|
32 | ;; Enable muhenkan key only for preediting |
---|
33 | (ibus-define-common-key 'muhenkan nil) |
---|
34 | (ibus-define-preedit-key 'muhenkan t) |
---|
35 | |
---|
36 | ;; Use C-/ for Undo command |
---|
37 | (ibus-define-common-key ?\C-/ nil) |
---|
38 | |
---|
39 | ;; Change cursor color depending on IBus status |
---|
40 | (setq ibus-cursor-color '("red" "blue" "limegreen")) |
---|
41 | |
---|
42 | ;; Using ibus-anthy |
---|
43 | ;; To toggle half-width eisu mode by C-j, add the following to .emacs: |
---|
44 | (ibus-define-common-key ?\C-j t) |
---|
45 | |
---|
46 | ;; To use kana input method with jp106 keyboard, you can enable kana |
---|
47 | ;; onbiki key as follows: |
---|
48 | (setq ibus-use-kana-onbiki-key t) |
---|
49 | |
---|
50 | ;; If you use thumb shift input method, you have to specify the |
---|
51 | ;; simultaneous pressing time as: |
---|
52 | (setq ibus-ibus-simultaneous-pressing-time 0.1) |
---|
53 | |
---|
54 | ;; Using ibus-chewing |
---|
55 | ;; Please set input style to "in application window" in ibus-chewing's |
---|
56 | ;; configuration dialog. |
---|
57 | ) |
---|
58 | ) |
---|
59 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
---|
60 | (provide 'vine-default-ibus-el) |
---|
61 | |
---|
62 | ;; Local Variables: |
---|
63 | ;; mode: emacs-lisp |
---|
64 | ;; End: |
---|