diff --git a/src/lsp/trace.lsp b/src/lsp/trace.lsp
index d47c29c49..7acd68aa0 100644
--- a/src/lsp/trace.lsp
+++ b/src/lsp/trace.lsp
@@ -253,7 +253,7 @@ all functions."
      ((:pr :print) (step-print) :constant
       ":pr(int)        Pretty print current form"
       ":print                                          [Stepper command]~@
-       :p                                              [Abbreviation]~@
+       :pr                                             [Abbreviation]~@
        ~@
        Pretty print current form.~%")
      ((:form) *step-form* :constant