diff --git a/.emacs.d/lisp/init-sly.el b/.emacs.d/lisp/init-sly.el
index 3bba995e..ea59b664 100644
--- a/.emacs.d/lisp/init-sly.el
+++ b/.emacs.d/lisp/init-sly.el
@@ -295,10 +295,9 @@ returns a string."
 
 (cl-defun ambrevar/sly-new-prompt (_package
                                 package-nickname
-                                &key
-                                entry-idx
                                 error-level
-                                &allow-other-keys)
+                                entry-idx
+                                _condition)
   (concat
    (propertize (ambrevar/sly-status) 'font-lock-face 'font-lock-comment-face)
    "("