(define anthy-next-segment-key '(generic-go-right-key))
(define anthy-next-segment-key? (make-key-predicate '(generic-go-right-key?)))
(define anthy-prev-segment-key '(generic-go-left-key))
(define anthy-prev-segment-key? (make-key-predicate '(generic-go-left-key?)))
(define anthy-extend-segment-key '("<IgnoreCase><Control>o" "<Shift>right"))
(define anthy-extend-segment-key? (make-key-predicate '("<IgnoreCase><Control>o" "<Shift>right")))
(define anthy-shrink-segment-key '("<IgnoreCase><Control>i" "<Shift>left"))
(define anthy-shrink-segment-key? (make-key-predicate '("<IgnoreCase><Control>i" "<Shift>left")))
(define anthy-transpose-as-hiragana-key '("F6" "Muhenkan"))
(define anthy-transpose-as-hiragana-key? (make-key-predicate '("F6" "Muhenkan")))
(define anthy-transpose-as-katakana-key '("F7" "Muhenkan"))
(define anthy-transpose-as-katakana-key? (make-key-predicate '("F7" "Muhenkan")))
(define anthy-transpose-as-halfkana-key '("F8" "Muhenkan"))
(define anthy-transpose-as-halfkana-key? (make-key-predicate '("F8" "Muhenkan")))
(define anthy-transpose-as-halfwidth-alnum-key '("F10" "<Shift>Muhenkan"))
(define anthy-transpose-as-halfwidth-alnum-key? (make-key-predicate '("F10" "<Shift>Muhenkan")))
(define anthy-transpose-as-fullwidth-alnum-key '("F9" "<Shift>Muhenkan"))
(define anthy-transpose-as-fullwidth-alnum-key? (make-key-predicate '("F9" "<Shift>Muhenkan")))
(define anthy-commit-as-opposite-kana-key '())
(define anthy-commit-as-opposite-kana-key? (make-key-predicate '()))
