1.1--- a/emacs/lib/slime-cape.el	Wed Sep 11 21:40:01 2024 -0400
     1.2+++ b/emacs/lib/slime-cape.el	Thu Sep 12 16:48:47 2024 -0400
     1.3@@ -14,6 +14,7 @@
     1.4 ;; Package-Requires: ((slime-company "1.6"))
     1.5 
     1.6 (require 'slime)
     1.7+(require 'slime-repl)
     1.8 (require 'slime-company)
     1.9 (require 'cape)
    1.10 
    1.11@@ -22,13 +23,17 @@
    1.12 (define-slime-contrib slime-cape
    1.13   (:authors "ccQpein")
    1.14   (:swank-dependencies swank-arglists)
    1.15-  (:on-unload
    1.16-   (delete cape-slime-backend completion-at-point-functions)))
    1.17+  (:on-load
    1.18+   (dolist (h '(slime-mode-hook slime-repl-mode-hook sldb-mode-hook))
    1.19+     (add-hook h 'slime-cape-enable)))
    1.20+   (:on-unload
    1.21+    (dolist (h '(slime-mode-hook slime-repl-mode-hook sldb-mode-hook))
    1.22+      (remove-hook h 'slime-cape-enable))))
    1.23 
    1.24-(defun slime-cape-maybe-enable ()
    1.25+(defun slime-cape-enable ()
    1.26   (interactive)
    1.27-  (when slime-mode
    1.28-    (add-to-list 'completion-at-point-functions cape-slime-backend)))
    1.29+  (push cape-slime-backend completion-at-point-functions)
    1.30+  (push cape-slime-backend slime-completion-at-point-functions))
    1.31 
    1.32 (provide 'slime-cape)
    1.33 ;;; slime-cape.el ends here