61
61
;;(define-key prime-english-direct-key? '("." "," ":" ";" "(" ")" "\"" "'" "!" "?"))
63
63
(define-custom-group 'prime-keys1
64
(_ "PRIME key bindings 1")
65
(_ "long description will be here."))
64
(N_ "PRIME key bindings 1")
65
(N_ "long description will be here."))
67
67
(define-custom-group 'prime-keys2
68
(_ "PRIME key bindings 2")
69
(_ "long description will be here."))
68
(N_ "PRIME key bindings 2")
69
(N_ "long description will be here."))
71
71
(define-custom-group 'prime-keys3
72
(_ "PRIME key bindings 3")
73
(_ "long description will be here."))
72
(N_ "PRIME key bindings 3")
73
(N_ "long description will be here."))
76
76
(define-custom 'prime-register-key '("<Control>w")
79
(_ "[PRIME] prime-register-key")
80
(_ "long description will be here"))
79
(N_ "[PRIME] prime-register-key")
80
(N_ "long description will be here"))
82
82
(define-custom 'prime-typing-mode-hiragana-key '("F6")
83
83
'(prime-keys1 mode-transition)
85
(_ "[PRIME] prime-typing-mode-hiragana-key")
86
(_ "long description will be here"))
85
(N_ "[PRIME] prime-typing-mode-hiragana-key")
86
(N_ "long description will be here"))
88
88
(define-custom 'prime-typing-mode-katakana-key '("F7")
89
89
'(prime-keys1 mode-transition)
91
(_ "[PRIME] prime-typing-mode-katakana-key")
92
(_ "long description will be here"))
91
(N_ "[PRIME] prime-typing-mode-katakana-key")
92
(N_ "long description will be here"))
94
94
(define-custom 'prime-typing-mode-hankana-key '("F8")
95
95
'(prime-keys1 mode-transition)
97
(_ "[PRIME] prime-typing-mode-hankana-key")
98
(_ "long description will be here"))
97
(N_ "[PRIME] prime-typing-mode-hankana-key")
98
(N_ "long description will be here"))
100
100
(define-custom 'prime-typing-mode-wideascii-key '("F9")
101
101
'(prime-keys1 mode-transition)
103
(_ "[PRIME] prime-typing-mode-wideascii-key")
104
(_ "long description will be here"))
103
(N_ "[PRIME] prime-typing-mode-wideascii-key")
104
(N_ "long description will be here"))
106
106
(define-custom 'prime-typing-mode-ascii-key '("F10")
107
107
'(prime-keys1 mode-transition)
109
(_ "[PRIME] prime-typing-mode-ascii-key")
110
(_ "long description will be here"))
109
(N_ "[PRIME] prime-typing-mode-ascii-key")
110
(N_ "long description will be here"))
115
115
(define-custom 'prime-on-key '("<IgnoreCase><Control>j" generic-on-key)
116
116
'(prime-keys2 mode-transition)
119
(_ "long description will be here"))
119
(N_ "long description will be here"))
121
121
(define-custom 'prime-latin-key '("<Control>l" generic-off-key)
122
122
'(prime-keys2 mode-transition)
125
(_ "long description will be here"))
125
(N_ "long description will be here"))
127
127
(define-custom 'prime-wide-latin-key '("<Control>L")
128
128
'(prime-keys2 mode-transition)
130
(_ "[PRIME] fullwidth alphanumeric mode")
131
(_ "long description will be here"))
130
(N_ "[PRIME] fullwidth alphanumeric mode")
131
(N_ "long description will be here"))
133
133
(define-custom 'prime-begin-conv-key '(generic-begin-conv-key)
136
(_ "[PRIME] begin conversion")
137
(_ "long description will be here"))
136
(N_ "[PRIME] begin conversion")
137
(N_ "long description will be here"))
139
139
(define-custom 'prime-commit-key '(generic-commit-key)
143
(_ "long description will be here"))
142
(N_ "[PRIME] commit")
143
(N_ "long description will be here"))
145
145
(define-custom 'prime-cancel-key '(generic-cancel-key)
149
(_ "long description will be here"))
148
(N_ "[PRIME] cancel")
149
(N_ "long description will be here"))
151
151
(define-custom 'prime-next-candidate-key '(generic-next-candidate-key)
154
(_ "[PRIME] next candidate")
155
(_ "long description will be here"))
154
(N_ "[PRIME] next candidate")
155
(N_ "long description will be here"))
157
157
(define-custom 'prime-prev-candidate-key '(generic-prev-candidate-key)
160
(_ "[PRIME] previous candidate")
161
(_ "long description will be here"))
160
(N_ "[PRIME] previous candidate")
161
(N_ "long description will be here"))
163
163
(define-custom 'prime-next-page-key '(generic-next-page-key)
166
(_ "[PRIME] next page of candidate window")
167
(_ "long description will be here"))
166
(N_ "[PRIME] next page of candidate window")
167
(N_ "long description will be here"))
169
169
(define-custom 'prime-prev-page-key '(generic-prev-page-key)
172
(_ "[PRIME] previous page of candidate window")
173
(_ "long description will be here"))
172
(N_ "[PRIME] previous page of candidate window")
173
(N_ "long description will be here"))
178
178
(define-custom 'prime-go-left-edge-key '("<IgnoreCase><Control>a" "<Control>left")
181
(_ "[PRIME] beginning of preedit")
182
(_ "long description will be here"))
181
(N_ "[PRIME] beginning of preedit")
182
(N_ "long description will be here"))
184
184
(define-custom 'prime-go-right-edge-key '("<IgnoreCase><Control>e" "<Control>right")
187
(_ "[PRIME] end of preedit")
188
(_ "long description will be here"))
187
(N_ "[PRIME] end of preedit")
188
(N_ "long description will be here"))
190
190
(define-custom 'prime-backspace-key '(generic-backspace-key)
193
(_ "[PRIME] backspace")
194
(_ "long description will be here"))
193
(N_ "[PRIME] backspace")
194
(N_ "long description will be here"))
196
196
(define-custom 'prime-delete-key '(generic-delete-key)
200
(_ "long description will be here"))
199
(N_ "[PRIME] delete")
200
(N_ "long description will be here"))
202
202
(define-custom 'prime-go-left-key '(generic-go-left-key)
205
(_ "[PRIME] go left")
206
(_ "long description will be here"))
205
(N_ "[PRIME] go left")
206
(N_ "long description will be here"))
208
208
(define-custom 'prime-go-right-key '(generic-go-right-key)
211
(_ "[PRIME] go right")
212
(_ "long description will be here"))
211
(N_ "[PRIME] go right")
212
(N_ "long description will be here"))
214
214
(define-custom 'prime-shrink-segment-key '("<IgnoreCase><Control>i" "<Shift>left")
217
(_ "[PRIME] shrink segment")
218
(_ "long description will be here"))
217
(N_ "[PRIME] shrink segment")
218
(N_ "long description will be here"))
220
220
(define-custom 'prime-expand-segment-key '("<IgnoreCase><Control>o" "<Shift>right")
223
(_ "[PRIME] extend segment")
224
(_ "long description will be here"))
223
(N_ "[PRIME] extend segment")
224
(N_ "long description will be here"))
226
226
(define-custom 'prime-english-next-candidate-key '("<IgnoreCase><Control>i" "tab" generic-next-candidate-key)
227
227
'(prime-keys3 english)
229
(_ "[PRIME] next candidate in English mode")
230
(_ "long description will be here"))
229
(N_ "[PRIME] next candidate in English mode")
230
(N_ "long description will be here"))
232
232
(define-custom 'prime-english-direct-key '("." "," ":" ";" "(" ")" "\"" "'" "!" "?")
233
233
'(prime-keys3 english)
235
(_ "[PRIME] Direct key in English mode")
236
(_ "long description will be here"))
235
(N_ "[PRIME] Direct key in English mode")
236
(N_ "long description will be here"))