From db728f16997c045162041920e359666dc413ea00 Mon Sep 17 00:00:00 2001 From: Alan Pearce Date: Sun, 23 Apr 2023 22:38:24 +0200 Subject: emacs: replace company-tabnine with tabnine-capf --- user/emacs/init.el | 27 ++++++++------------------- 1 file changed, 8 insertions(+), 19 deletions(-) (limited to 'user/emacs/init.el') diff --git a/user/emacs/init.el b/user/emacs/init.el index d75b2025..480c411b 100644 --- a/user/emacs/init.el +++ b/user/emacs/init.el @@ -516,27 +516,16 @@ _p_rev _u_pper _=_: upper/lower _r_esolve :defer t :config (setq all-the-icons-color-icons nil)) -(defmacro company-set-secondary-backend-for-mode (mode backend) - (let ((hook-fn-name (intern (concat "ap/set-local-backend-" (symbol-name mode))))) - `(progn - (defun ,hook-fn-name () - (make-local-variable 'company-backends) - (setq company-backends (append - (list - 'company-tabnine - ,backend) - (copy-tree (remq 'company-tabnine company-backends))))) - (add-hook ',(derived-mode-hook-name mode) #',hook-fn-name)))) - -(use-package company-tabnine - :commands (company-tabnine) +(use-package tabnine-capf + :commands (tabnine-completion-at-point) :after (company) - :config (setq company-tabnine-binaries-folder "~/.local/tabnine") - :general ("" #'company-tabnine-call-other-backends - "" #'company-tabnine-call-other-backends) + :config (setq tabnine-capf-binaries-folder "~/.local/tabnine") + ;; use tabnine-capf-with-disabled + :general ("" #'tabnine-capf-call-other-backends + "" #'tabnine-capf-call-other-backends) :init (progn - (advice-add 'company-tabnine-start-process :around #'quiet) - (add-to-list 'company-backends #'company-tabnine))) + (advice-add 'tabnine-capf-start-process :around #'quiet) + (add-to-list 'company-backends #'tabnine-completion-at-point))) ;;; Documentation -- cgit 1.4.1