-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathinit-chinese-word-segment.el
37 lines (29 loc) · 1.36 KB
/
init-chinese-word-segment.el
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
;; (require 'init-cns)
;; (when my/linux-p
;; (require 'cns)
;; (global-cns-mode))
(use-package deno-bridge-jieba
:straight (:type git :host github :repo "ginqi7/deno-bridge-jieba" :files ("*"))
:commands (my/deno-bridge-jieba-mode)
:config
(define-minor-mode my/deno-bridge-jieba-mode
"minor mode for deno-bridge-jieba word jumping key bindings"
:keymap (let ((map (make-sparse-keymap)))
(define-key map [remap forward-word] 'deno-bridge-jieba-forward-word)
(define-key map [remap backward-word] 'deno-bridge-jieba-backward-word)
(define-key map [remap forward-kill-word] 'deno-bridge-jieba-kill-word)
(define-key map [remap backward-kill-word] 'deno-bridge-jieba-backward-kill-word)
map)
)
(define-globalized-minor-mode global-my/deno-bridge-jieba-mode
my/deno-bridge-jieba-mode
my/deno-bridge-jieba-auto-enable)
(defun my/deno-bridge-jieba-auto-enable nil
"Enable `cns-mode' if current buffer contaions HànZì."
(if (string-match "\\cC" (buffer-string))
(my/deno-bridge-jieba-mode 1))))
(add-hook 'my/startup-hook #'(lambda ()
(when (executable-find "deno")
(require 'deno-bridge-jieba)
(global-my/deno-bridge-jieba-mode))))
(provide 'init-chinese-word-segment)