about summary refs log tree commit diff
path: root/uim/.uim
blob: 493769d7e0a809bd1f460967079f476831e4b2d1 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
;;; -*- mode: scheme; -*-

(define custom-activate-default-im-name? #t)
(define custom-preserved-default-im-name 'skk)
(define default-im-name 'skk)
(define enabled-im-list '(skk))
(define enable-im-switch? #f)
(define switch-im-key '())
(define switch-im-key? (make-key-predicate '()))
(define switch-im-skip-direct-im? #f)
(define enable-im-toggle? #f)
(define toggle-im-key '())
(define toggle-im-key? (make-key-predicate '()))
(define toggle-im-alt-im 'direct)
(define uim-color 'uim-color-uim)
(define candidate-window-style 'vertical)
(define candidate-window-position 'caret)
(define enable-lazy-loading? #t)
(define bridge-show-input-state? #f)
(define bridge-show-with? 'time)
(define bridge-show-input-state-time-length 3)


(define toolbar-display-time 'never)


(define uim-xim-use-xft-font? #t)
(define uim-xim-xft-font-name "Source Sans Han")


(define enable-annotation? #t)
(define annotation-agent 'im)
(define skk-show-annotation? #t)
(define skk-show-annotation-in-preedit? #f)


(define skk-use-candidate-window? #t)
(define skk-commit-candidate-by-label-key? #t)
(define skk-candidate-selection-style 'ddskk-like)
(define skk-use-manual-candwin-setting? #f)
(define skk-candidate-op-count 5)
(define skk-nr-candidate-max 7)
(define skk-widgets '(widget_skk_input_mode widget_skk_kana_input_method))
(define default-widget_skk_input_mode 'action_skk_latin)
(define skk-input-mode-actions '(action_skk_latin action_skk_hiragana action_skk_katakana action_skk_hankana action_skk_wide_latin))
(define default-widget_skk_kana_input_method 'action_skk_roma)
(define skk-kana-input-method-actions '(action_skk_roma action_skk_azik action_skk_act action_skk_kzik))


(define skk-style 'skk-style-ddskk-like)
(define skk-use-recursive-learning? #t)
(define skk-use-numeric-conversion? #t)
(define skk-auto-start-henkan? #t)
(define skk-dcomp-activate? #t)
(define skk-use-look? #f)
(define skk-look-dict "")
(define skk-show-annotation? #t)
(define skk-show-annotation-in-preedit? #f)
(define skk-use-with-vi? #t)
(define skk-egg-like-newline? #t)
(define skk-commit-newline-explicitly? #f)


(define skk-use-skkserv? #f)
(define skk-skkserv-enable-completion? #f)
(define skk-skkserv-completion-timeout 2000)
(define skk-skkserv-use-env? #t)
(define skk-skkserv-hostname "localhost")
(define skk-skkserv-portnum 1178)
(define skk-skkserv-address-family 'unspecified)
(define skk-dic-file-name "/usr/share/skk/SKK-JISYO.L")
(define skk-personal-dic-filename "/home/azahi/.local/var/skk-jisyo")
(define skk-uim-personal-dic-filename "/home/azahi/.local/var/skk-uim-jisyo")


(define skk-on-key '("<IgnoreCase><Control>j" "zenkaku-hankaku" "<IgnoreShift><Alt>`"))
(define skk-on-key? (make-key-predicate '("<IgnoreCase><Control>j" "zenkaku-hankaku" "<IgnoreShift><Alt>`")))
(define skk-latin-key '("<IgnoreCase>l" "zenkaku-hankaku" "<IgnoreShift><Alt>`"))
(define skk-latin-key? (make-key-predicate '("<IgnoreCase>l" "zenkaku-hankaku" "<IgnoreShift><Alt>`")))
(define skk-wide-latin-key '("<IgnoreCase><Shift>l"))
(define skk-wide-latin-key? (make-key-predicate '("<IgnoreCase><Shift>l")))
(define skk-kcode-input-key '("yen"))
(define skk-kcode-input-key? (make-key-predicate '("yen")))
(define skk-kanji-mode-key '("<IgnoreCase><Shift>q"))
(define skk-kanji-mode-key? (make-key-predicate '("<IgnoreCase><Shift>q")))
(define skk-hankaku-kana-key '("<IgnoreCase><Control>q"))
(define skk-hankaku-kana-key? (make-key-predicate '("<IgnoreCase><Control>q")))
(define skk-kana-toggle-key '("<IgnoreCase>q"))
(define skk-kana-toggle-key? (make-key-predicate '("<IgnoreCase>q")))
(define skk-begin-conv-key '(" "))
(define skk-begin-conv-key? (make-key-predicate '(" ")))
(define skk-commit-key '("<IgnoreCase><Control>j"))
(define skk-commit-key? (make-key-predicate '("<IgnoreCase><Control>j")))
(define skk-cancel-key '("escape" "<IgnoreShift><Control>[" "<IgnoreCase><Control>g"))
(define skk-cancel-key? (make-key-predicate '("escape" "<IgnoreShift><Control>[" "<IgnoreCase><Control>g")))
(define skk-sticky-key '())
(define skk-sticky-key? (make-key-predicate '()))


(define skk-return-key '("return" "<IgnoreCase><Control>m"))
(define skk-return-key? (make-key-predicate '("return" "<IgnoreCase><Control>m")))
(define skk-latin-conv-key '("<IgnoreShift>/"))
(define skk-latin-conv-key? (make-key-predicate '("<IgnoreShift>/")))
(define skk-conv-wide-latin-key '("<IgnoreCase><Control>q"))
(define skk-conv-wide-latin-key? (make-key-predicate '("<IgnoreCase><Control>q")))
(define skk-conv-opposite-case-key '("<IgnoreCase><Control>u"))
(define skk-conv-opposite-case-key? (make-key-predicate '("<IgnoreCase><Control>u")))
(define skk-begin-completion-key '("tab" "<IgnoreCase><Control>i" "<Alt>tab" "<IgnoreCase><Control><Alt>i"))
(define skk-begin-completion-key? (make-key-predicate '("tab" "<IgnoreCase><Control>i" "<Alt>tab" "<IgnoreCase><Control><Alt>i")))
(define skk-next-completion-key '("<IgnoreShift>." "tab" "<IgnoreCase><Control>i"))
(define skk-next-completion-key? (make-key-predicate '("<IgnoreShift>." "tab" "<IgnoreCase><Control>i")))
(define skk-prev-completion-key '("<IgnoreShift>,"))
(define skk-prev-completion-key? (make-key-predicate '("<IgnoreShift>,")))
(define skk-new-completion-from-current-comp-key '("<Alt>tab" "<IgnoreCase><Control><Alt>i"))
(define skk-new-completion-from-current-comp-key? (make-key-predicate '("<Alt>tab" "<IgnoreCase><Control><Alt>i")))
(define skk-special-midashi-key '("<IgnoreShift>>" "<IgnoreShift><" "<IgnoreShift>?"))
(define skk-special-midashi-key? (make-key-predicate '("<IgnoreShift>>" "<IgnoreShift><" "<IgnoreShift>?")))
(define skk-vi-escape-key '("escape" "<IgnoreShift><Control>["))
(define skk-vi-escape-key? (make-key-predicate '("escape" "<IgnoreShift><Control>[")))
(define skk-state-direct-no-preedit-nop-key '("<IgnoreCase><Control>j"))
(define skk-state-direct-no-preedit-nop-key? (make-key-predicate '("<IgnoreCase><Control>j")))
(define skk-purge-candidate-key '("<IgnoreCase><Shift>x"))
(define skk-purge-candidate-key? (make-key-predicate '("<IgnoreCase><Shift>x")))


(define skk-begin-conv-with-completion-key '("<Alt> "))
(define skk-begin-conv-with-completion-key? (make-key-predicate '("<Alt> ")))
(define skk-commit-with-conv-completion-key '("<IgnoreCase><Control><Alt>j"))
(define skk-commit-with-conv-completion-key? (make-key-predicate '("<IgnoreCase><Control><Alt>j")))
(define skk-next-candidate-key '(" " "down" "<IgnoreCase><Control>n"))
(define skk-next-candidate-key? (make-key-predicate '(" " "down" "<IgnoreCase><Control>n")))
(define skk-prev-candidate-key '("<IgnoreCase>x" "up" "<IgnoreCase><Control>p"))
(define skk-prev-candidate-key? (make-key-predicate '("<IgnoreCase>x" "up" "<IgnoreCase><Control>p")))
(define skk-next-page-key '("next"))
(define skk-next-page-key? (make-key-predicate '("next")))
(define skk-prev-page-key '("prior"))
(define skk-prev-page-key? (make-key-predicate '("prior")))
(define skk-backspace-key '("backspace" "<IgnoreCase><Control>h"))
(define skk-backspace-key? (make-key-predicate '("backspace" "<IgnoreCase><Control>h")))
(define skk-go-left-key '("left" "<IgnoreCase><Control>b"))
(define skk-go-left-key? (make-key-predicate '("left" "<IgnoreCase><Control>b")))
(define skk-go-right-key '("right" "<IgnoreCase><Control>f"))
(define skk-go-right-key? (make-key-predicate '("right" "<IgnoreCase><Control>f")))

Consider giving Nix/NixOS a try! <3