auto-completion: fix add-company-backends macro

We must always use spacemacs/mplist-get on an modified plist, mixing both
spacemacs/mplist-get and plist-get leads to undefined behavior as soon as a
keyword as multiple keywords.
This commit is contained in:
syl20bnr 2018-06-04 01:07:00 -04:00
parent 0d800bdbfa
commit a698c8ba58
1 changed files with 3 additions and 3 deletions

View File

@ -69,12 +69,12 @@ Available PROPS:
(let* ((backends (spacemacs/mplist-get props :backends))
(modes (spacemacs/mplist-get props :modes))
(variables (spacemacs/mplist-get props :variables))
(from (plist-get props :from))
(from (car (spacemacs/mplist-get props :from)))
(hooks (if (memq :append-hooks props)
(plist-get props :append-hooks)
(car (spacemacs/mplist-get props :append-hooks))
t))
(call-hooks (when (memq :call-hooks props)
(plist-get props :call-hooks)))
(car (spacemacs/mplist-get props :call-hooks))))
(result '(progn)))
(dolist (mode modes)
(let ((backends-var-name (intern (format "company-backends-%S" mode)))