Fix max-lisp-eval-depth in :company-backend #115

Mode was inadvertantly run like a function in the :company-backend
setting macro.
This commit is contained in:
Henrik Lissner 2017-06-19 12:08:32 +02:00
parent 54d8e7fe27
commit 14e69ca830
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -8,9 +8,9 @@
(mapconcat #'symbol-name modes "-"))))) (mapconcat #'symbol-name modes "-")))))
`(prog1 `(prog1
(defun ,def-name () (defun ,def-name ()
(when (memq major-mode ,modes) (when (memq major-mode ',modes)
(require 'company) (require 'company)
(cl-pushnew ,backends company-backends :test #'equal))) (cl-pushnew ',backends company-backends :test #'equal)))
(add-hook! ,modes #',def-name)))) (add-hook! ,modes #',def-name))))