# HG changeset patch
# User Richard Westhaver <ellis@rwest.io>
# Date 1724456456 14400
# Node ID c0062541039f178546d5fdb43b11035387ad0e83
# Parent  d7f04a773c602a2a080c0b37ba6cb4fb0435400d
plz work

diff -r d7f04a773c60 -r c0062541039f emacs/default.el
--- a/emacs/default.el	Fri Aug 23 19:03:17 2024 -0400
+++ b/emacs/default.el	Fri Aug 23 19:40:56 2024 -0400
@@ -185,11 +185,8 @@
 ;;; Lisp
 (use-package slime
   :ensure t
-  :hook ((slime-mode . #'slime-cape-maybe-enable)
-         (sldb . #'slime-cape-maybe-enable))
   :init
   (require 'slime-cape)
-  (require 'slime-autoloads)
   (setq slime-contribs '(slime-fancy
                          slime-quicklisp
                          slime-hyperdoc
@@ -278,7 +275,9 @@
 
   (setq common-lisp-style-default "core")
   ;; (define-key slime-prefix-map (kbd "i") 'clouseau-inspect)
-  (setq slime-threads-update-interval 1))
+  (setq slime-threads-update-interval 1)
+  (add-hook 'slime-mode-hook #'slime-cape-maybe-enable 100)
+  (add-hook 'slime-repl-mode-hook #'slime-cape-maybe-enable 100))
 
 (use-package lisp-mode
   :ensure nil
diff -r d7f04a773c60 -r c0062541039f emacs/lib/slime-cape.el
--- a/emacs/lib/slime-cape.el	Fri Aug 23 19:03:17 2024 -0400
+++ b/emacs/lib/slime-cape.el	Fri Aug 23 19:40:56 2024 -0400
@@ -22,17 +22,11 @@
 (define-slime-contrib slime-cape
   (:authors "ccQpein")
   (:swank-dependencies swank-arglists)
-  (:on-load
-   (dolist (h '(slime-mode-hook slime-repl-mode-hook sldb-mode-hook))
-     (add-hook h 'slime-cape-maybe-enable))
-   )
   (:on-unload
-   (dolist (h '(slime-mode-hook slime-repl-mode-hook sldb-mode-hook))
-     (remove-hook h 'slime-cape-maybe-enable))
-   (delete cape-slime-backend completion-at-point-functions)
-   ))
+   (delete cape-slime-backend completion-at-point-functions)))
 
 (defun slime-cape-maybe-enable ()
+  (interactive)
   (when (slime-company-active-p)
     (add-to-list 'completion-at-point-functions cape-slime-backend)))