about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--init.el41
1 files changed, 25 insertions, 16 deletions
diff --git a/init.el b/init.el index b3fcfee..934f3db 100644 --- a/init.el +++ b/init.el
@@ -752,26 +752,35 @@ if ripgrep is installed, otherwise `consult-grep'."
752 752
753(setup (:straight geiser)) 753(setup (:straight geiser))
754 754
755(setup (:straight slime) 755(setup common-lisp-ide
756 (defvar acdw/cl-ide :sly)
756 (defvar acdw/lisp-bin (or (executable-find "sbcl") 757 (defvar acdw/lisp-bin (or (executable-find "sbcl")
757 (executable-find "clisp"))) 758 (executable-find "clisp")))
758 (:needs acdw/lisp-bin) 759 (:needs acdw/lisp-bin)
759
760 (:also-load slime-autoloads)
761
762 (:option inferior-lisp-program acdw/lisp-bin) 760 (:option inferior-lisp-program acdw/lisp-bin)
763 761
764 (when-let ((slime-helper (or (expand-file-name-exists-p 762 (pcase acdw/cl-ide
765 "~/quicklisp/slime-helper.el") 763 (:slime
766 (expand-file-name-exists-p 764 (setup (:straight slime)
767 "~/var/quicklisp/slime-helper.el")))) 765 (:also-load slime-autoloads)
768 (load slime-helper)) 766
769 767 (when-let ((slime-helper (or (expand-file-name-exists-p
770 (with-eval-after-load 'company 768 "~/quicklisp/slime-helper.el")
771 (setup (:straight slime-company) 769 (expand-file-name-exists-p
772 (:option slime-company-completion 'fuzzy 770 "~/var/quicklisp/slime-helper.el"))))
773 slime-company-after-completion nil) 771 (load slime-helper))
774 (slime-setup '(slime-fancy slime-company))))) 772
773 (with-eval-after-load 'company
774 (setup (:straight slime-company)
775 (:option slime-company-completion 'fuzzy
776 slime-company-after-completion nil)
777 (slime-setup '(slime-fancy slime-company))))))
778
779 (:sly
780 (setup (:straight sly)
781 (:option sly-kill-without-query-p t)
782
783 (:also-load sly-autoloads)))))
775 784
776(setup (:straight (gemini-mode 785(setup (:straight (gemini-mode
777 :host nil 786 :host nil