custom-anthy-keys3.scm 1.2 KB

12345678910111213141516171819
  1. (define anthy-beginning-of-preedit-key '(generic-beginning-of-preedit-key))
  2. (define anthy-beginning-of-preedit-key? (make-key-predicate '(generic-beginning-of-preedit-key?)))
  3. (define anthy-end-of-preedit-key '(generic-end-of-preedit-key))
  4. (define anthy-end-of-preedit-key? (make-key-predicate '(generic-end-of-preedit-key?)))
  5. (define anthy-kill-key '(generic-kill-key))
  6. (define anthy-kill-key? (make-key-predicate '(generic-kill-key?)))
  7. (define anthy-kill-backward-key '(generic-kill-backward-key))
  8. (define anthy-kill-backward-key? (make-key-predicate '(generic-kill-backward-key?)))
  9. (define anthy-backspace-key '(generic-backspace-key))
  10. (define anthy-backspace-key? (make-key-predicate '(generic-backspace-key?)))
  11. (define anthy-delete-key '(generic-delete-key))
  12. (define anthy-delete-key? (make-key-predicate '(generic-delete-key?)))
  13. (define anthy-go-left-key '(generic-go-left-key))
  14. (define anthy-go-left-key? (make-key-predicate '(generic-go-left-key?)))
  15. (define anthy-go-right-key '(generic-go-right-key))
  16. (define anthy-go-right-key? (make-key-predicate '(generic-go-right-key?)))
  17. (define anthy-vi-escape-key '("escape" "<Control>["))
  18. (define anthy-vi-escape-key? (make-key-predicate '("escape" "<Control>[")))