awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

Fix duplicate backends by :company-backend #135

Browse Source
This commit is contained in:
Henrik Lissner
2017-06-28 23:06:20 +02:00
parent 069d085eec
commit 0a34d8627e
1 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
modules/completion/company/config.el
View File

@ -7,11 +7,14 @@ MODES should be one major-mode symbol or a list of them."
`(progn
,@(cl-loop for mode in (doom-enlist (doom-unquote modes))
for def-name = (intern (format "doom--init-company-%s" mode))
collect `(defun ,def-name ()
(when (and (eq major-mode ',mode)
,(not (eq backends '(nil))))
(require 'company)
(setq company-backends (append (list ,@backends) company-backends))))
collect
`(defun ,def-name ()
(when (and (eq major-mode ',mode)
,(not (eq backends '(nil))))
(require 'company)
(make-variable-buffer-local 'company-backends)
(dolist (backend (list ,@(reverse backends)))
(cl-pushnew backend company-backends :test #'equal))))
collect `(add-hook! ,mode #',def-name))))