completion/company: company-frontends bug fixed upstream
This commit is contained in:
parent
ffabd2687b
commit
1ee9a1893f
1 changed files with 0 additions and 9 deletions
|
@ -58,15 +58,6 @@ MODES should be one major-mode symbol or a list of them."
|
||||||
(def-package! company-box
|
(def-package! company-box
|
||||||
:when (and EMACS26+ (featurep! +childframe))
|
:when (and EMACS26+ (featurep! +childframe))
|
||||||
:hook (company-mode . company-box-mode)
|
:hook (company-mode . company-box-mode)
|
||||||
:init
|
|
||||||
(defun +company|fix-frontends ()
|
|
||||||
"Ensure `company-pseudo-tooltip-frontend' is *not* in `company-frontends'
|
|
||||||
when company-box is active, which are incompatible and cause duplicate popups."
|
|
||||||
(make-variable-buffer-local 'company-frontends)
|
|
||||||
(if company-box-mode
|
|
||||||
(setq company-frontends (delq 'company-pseudo-tooltip-frontend company-frontends))
|
|
||||||
(cl-pushnew 'company-pseudo-tooltip-frontend company-frontends :test #'eq)))
|
|
||||||
(add-hook 'company-box-mode-hook #'+company|fix-frontends)
|
|
||||||
:config
|
:config
|
||||||
(setq company-box-backends-colors nil
|
(setq company-box-backends-colors nil
|
||||||
company-box-icons-elisp
|
company-box-icons-elisp
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue