20 lines
597 B
EmacsLisp
20 lines
597 B
EmacsLisp
;;; lang/common-lisp/config.el -*- lexical-binding: t; -*-
|
|
|
|
;; `slime'
|
|
(setq slime-contribs '(slime-fancy))
|
|
(after! slime
|
|
(setq inferior-lisp-program (executable-find "sbcl")))
|
|
|
|
|
|
(def-package! slime-company
|
|
:when (featurep! :completion company)
|
|
:commands slime-company
|
|
:init
|
|
(push 'slime-company slime-contribs)
|
|
|
|
;; Don't override the global `company-backends'!
|
|
(defun +common-lisp|make-company-backends-local (&rest _)
|
|
(make-variable-buffer-local 'company-backends))
|
|
(advice-add #'slime-company-maybe-enable
|
|
:before #'+common-lisp|make-company-backends-local))
|
|
|