diff --git a/contrapunctus/cp-lisp.el b/contrapunctus/cp-lisp.el
index ff90a80..09ef094 100644
--- a/contrapunctus/cp-lisp.el
+++ b/contrapunctus/cp-lisp.el
@@ -1,22 +1,22 @@
 ;; (require 'chicken)
 
-(require 'slime)
-(slime-setup)
+;; (require 'slime)
 (require 'slime-autoloads)
-(setq inferior-lisp-program "/usr/bin/sbcl")
 (global-set-key (kbd "<f5> s") 'slime)
+(with-eval-after-load 'slime
+  (slime-setup)
+  (setq inferior-lisp-program "/usr/bin/sbcl")
+  (cp-set-keys
+   :keymap slime-mode-map
+   :bindings
+   `((,(kbd "M-n")   next-line)
+     (,(kbd "M-p")   previous-line))))
 
 (defun set-cl-repl-keys ()
   (if (or (cp-buffer-name-match-p "^\*inferior-lisp\*\\(<[0-9]*>\\)?")
           (eq major-mode 'lisp-mode))
       (local-set-key (kbd "TAB") 'completion-at-point)))
 
-(cp-set-keys
- :keymap slime-mode-map
- :bindings
- `((,(kbd "M-n")   next-line)
-   (,(kbd "M-p")   previous-line)))
-
 (add-hook 'slime-connected-hook 'set-cl-repl-keys)
 (add-hook 'comint-mode-hook     'set-cl-repl-keys)
 (add-hook 'lisp-mode-hook       'set-cl-repl-keys)