大佬,这个 english-helper 很好用。早在之前的 company 版本我就一直用,并且加了自定义的其它语种的 backend。
想问一个有点过分的问题!
目前 acm 框架是否可以添加自定义的 backend 呢?如果可以,方法是怎样的呢?我蒙着用 advice ,但是没成成功…
;;; --- english-helper for korean-helper
(add-to-list 'load-path (concat user-emacs-directory "lisp/blove-extra/lang-helper"))
(require 'blove-backends-kor-zh-15000)
(defcustom acm-backend-kor-min-length 1
"Minimum length of korean word."
:type 'integer)
(advice-add 'acm-backend-english-candidates
:after (lambda(keyword)
(let* ((candidates-kor (list)))
(when (>= (length keyword) acm-backend-korean-min-length)
(dolist (candidate blove-kor-zh-15000)
;; (when (string-prefix-p (downcase keyword) candidate)
(when (string-prefix-p candidate)
(add-to-list 'candidates-kor (list :key candidate
:icon "translate"
:label candidate
:display-label candidate
:annotation (get-text-property 0 :initials candidate)
:backend "korean")
t))))
candidates-kor))
)