diff --git a/.emacs.d/lisp/init-lisp.el b/.emacs.d/lisp/init-lisp.el
index 85aadf1a..df7b4b42 100644
--- a/.emacs.d/lisp/init-lisp.el
+++ b/.emacs.d/lisp/init-lisp.el
@@ -114,12 +114,11 @@ changed, of when called interactively."
                        (eshell/cd helm-ff-default-directory)
                        (eshell-reset)))
           (cd-sly (lambda ()            ; XXX: New!
-                    ;; Taken from `sly-mrepl-set-directory'.
                     (let ((directory helm-ff-default-directory))
-                      (sly-mrepl--save-and-copy-for-repl
-                       `(slynk:set-default-directory ,directory)
-                       :before (format "Setting directory to %s" directory))
-                      (cd directory))))
+                      (sly-change-directory directory)
+                      ;; REVIEW: `sly-change-directory' does not change the
+                      ;; REPL's dir, do it here.
+                      (cd-absolute directory))))
           (cd-shell
            (lambda ()
              (cl-case helm-ff-default-directory)