diff --git a/init.el b/init.el
index 9c912c8..5cc5ef5 100644
--- a/init.el
+++ b/init.el
@@ -201,7 +201,7 @@
     (meow-normal-define-key '("?" . avy-goto-char-timer))))
 
 (use-package puni
-  :hook prog-mode tex-mode slime-repl-mode racket-repl-mode
+  :hook prog-mode tex-mode sly-mrepl-mode racket-repl-mode
   :bind (:map puni-mode-map
               ("C-)" . puni-slurp-forward)
               ("C-}" . puni-barf-forward)
@@ -317,7 +317,7 @@
                   '(my-meow-undo meow-undo meow-undo-in-selection)))))
 
 (use-package rainbow-delimiters
-  :hook prog-mode slime-repl-mode racket-repl-mode)
+  :hook prog-mode sly-mrepl-mode racket-repl-mode)
 
 (use-package highlight-indent-guides
   :hook prog-mode
@@ -582,20 +582,17 @@
   :bind ("C-c v" . envrc-command-map)
   :hook (after-init . envrc-global-mode))
 
-(defun my-slime-repl-set-parens ()
-  (define-key slime-repl-mode-map (kbd "DEL") nil)
-  (local-set-key (kbd "DEL") #'backward-delete-char-untabify))
-
-(use-package slime
-  :hook (slime-repl-mode . my-slime-repl-set-parens)
+(use-package sly
   :custom
-  (slime-contribs '(slime-fancy slime-repl))
-  (slime-lisp-implementations '((sbcl ("sbcl")
-                                      :coding-system utf-8-unix)))
+  (sly-symbol-completion-mode nil)
   :config
   (setq inferior-lisp-program "sbcl")
+  (sly-setup)
   (with-eval-after-load 'meow
-    (add-to-list 'meow-mode-state-list '(sldb-mode . motion))))
+    (add-to-list 'meow-mode-state-list '(sly-db-mode . motion))))
+
+(use-package sly-asdf)
+(use-package sly-named-readtables)
 
 (use-package racket-mode
   :hook (racket-mode . racket-xp-mode))
@@ -950,7 +947,7 @@
   :hook
   (prog-mode . electric-pair-local-mode)
   (eval-expression-minibuffer-setup . electric-pair-local-mode)
-  (slime-repl-mode . electric-pair-local-mode)
+  (sly-mrepl-mode . electric-pair-local-mode)
   (racket-repl-mode . electric-pair-local-mode))
 
 (use-package ffap