emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

input/japanese: lazy load migemo

Browse source 
And don't error fatally if migemo isn't installed. Also, don't activate
helm-migemo-mode nor avy-migemo-mode if migemo doesn't initialize.
This commit is contained in:
Henrik Lissner 2019-05-21 21:47:22 -04:00
parent 3073bcbe39
commit b820de0ba9
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 14 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

25
modules/input/japanese/config.el
View file

@ -1,17 +1,25 @@
;;; input/japanese/config.el -*- lexical-binding: t; -*- ;;; input/japanese/config.el -*- lexical-binding: t; -*-
(def-package! migemo (def-package! migemo
:config :after-call (after-find-file pre-command-hook)
(setq migemo-command "cmigemo" :init
(setq search-default-regexp-mode nil
migemo-options '("-q" "--emacs" "-i" "\a") migemo-options '("-q" "--emacs" "-i" "\a")
migemo-user-dictionary nil migemo-user-dictionary nil
migemo-regex-dictionary nil migemo-regex-dictionary nil
migemo-coding-system 'utf-8-unix migemo-coding-system 'utf-8-unix
search-default-regexp-mode nil migemo-directory (concat doom-etc-dir "migemo/")
migemo-dictionary "/usr/local/share/migemo/utf-8/migemo-dict") migemo-dictionary "/usr/local/share/migemo/utf-8/migemo-dict")
(migemo-init) :config
(when (featurep! :completion helm) (when (executable-find migemo-command)
(after! helm (helm-migemo-mode +1)))) (migemo-init)
(def-package! avy-migemo
:after avy
:config (avy-migemo-mode 1))
(when (featurep! :completion helm)
(after! helm (helm-migemo-mode +1)))))
(use-package pangu-spacing (use-package pangu-spacing
@ -26,11 +34,6 @@
pangu-spacing-real-insert-separtor t)) pangu-spacing-real-insert-separtor t))
(def-package! avy-migemo
:after avy
:config (avy-migemo-mode 1))
(def-package! ddskk (def-package! ddskk
:general ("C-x j" #'skk-mode)) :general ("C-x j" #'skk-mode))