aboutsummaryrefslogtreecommitdiff
path: root/.emacs.d/lisp/init-input-method.el
blob: d9390b23b8ecd46c43b7bb4f51c66f721015651b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
(when *is-a-linux*
  (setq fcitx-remote-command "fcitx5-remote")
  (when (gx/maybe-require-package 'fcitx)
    (add-hook 'after-init-hook 'fcitx-aggressive-setup)))

(when *is-a-mac*
  (setq sis-external-ism "/usr/local/bin/macism")
  (setq sis-english-source "com.apple.keylayout.ABC"
 	sis-other-source "com.apple.inputmethod.SCIM.ITABC")
  (setq sis-do-set
 	(lambda (source) (start-process "set-input-source" nil
 					sis-external-ism source)))
  (setq sis-do-get
 	(lambda () (start-process "get-input-source" nil
 				  sis-external-ism)))
  (when (gx/maybe-require-package 'sis)
    (add-hook 'after-init-hook
	      (lambda ()
		(sis-global-respect-mode t)
		(sis-global-context-mode t)))))

(provide 'init-input-method)