Add :lang common-lisp

modules/lang/common-lisp/config.el

@@ -0,0 +1,20 @@
+;;; 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))
+

modules/lang/common-lisp/packages.el

@@ -0,0 +1,6 @@
+;; -*- no-byte-compile: t; -*-
+;;; lang/common-lisp/packages.el
+
+(package! slime)
+(when (featurep! :completion company)
+  (package! slime-company))

modules/lang/emacs-lisp/config.el

@@ -71,11 +71,6 @@
       auto-compile-use-mode-line nil)
 
 
-;; `slime'
-(setq inferior-lisp-program "clisp")
-(after! slime (require 'slime-fuzzy))
-
-
 ;; `macrostep'
 (map! :after macrostep
       :map macrostep-keymap

modules/lang/emacs-lisp/packages.el

@@ -5,7 +5,6 @@
 (package! highlight-quoted)
 (package! macrostep)
 (package! overseer)
-(package! slime)
 
 (when (featurep! :feature syntax-checker)
   (package! flycheck-cask))