1.1--- a/emacs/default.el Sun Feb 25 20:19:46 2024 -0500
1.2+++ b/emacs/default.el Tue Feb 27 21:46:10 2024 -0500
1.3@@ -87,7 +87,7 @@
1.4 corfu orderless cape ;; completion
1.5 slime ;; common lisp server
1.6 bbdb
1.7- ;; slime-company
1.8+ slime-company
1.9 which-key ;; key helper
1.10 ;; langs
1.11 rust-mode)
1.12@@ -180,8 +180,9 @@
1.13
1.14 (use-package slime
1.15 :ensure t
1.16- :config
1.17+ :init
1.18 (require 'slime-autoloads)
1.19+ (require 'slime-cape)
1.20 (setq slime-contribs '(slime-fancy
1.21 slime-quicklisp
1.22 slime-hyperdoc
1.23@@ -190,6 +191,7 @@
1.24 slime-media
1.25 slime-mrepl
1.26 slime-sbcl-exts
1.27+ slime-cape ;; ext
1.28 ;; slime-snapshot
1.29 slime-sprof
1.30 slime-tramp
1.31@@ -199,6 +201,8 @@
1.32 slime-asdf))
1.33 (put 'make-instance 'common-lisp-indent-function 1)
1.34 (put 'reinitialize-instance 'common-lisp-indent-function 1)
1.35+ (add-hook 'slime-mode-hook #'slime-cape-maybe-enable)
1.36+ (add-hook 'slime-repl-mode-hook #'slime-cape-maybe-enable)
1.37 (slime-setup)
1.38 (defvar slime-toggle nil)
1.39 (defun slime-toggle ()
1.40@@ -211,6 +215,7 @@
1.41 (setq slime-toggle (current-buffer))
1.42 (slime-repl))))
1.43
1.44+ ;; X11-only (mcclim requires clx)
1.45 (defun clouseau-inspect (string)
1.46 "Inspect a lisp value with Clouseau. make sure to load clouseau
1.47 with a custom core or in your init file before using this