diff --git a/macros.lisp b/macros.lisp
index 0ac344765f7058bd000085e2358b5433bf4b3470..699c6cf23c29397aa2efc3ddbad83b6184e7c103 100644
--- a/macros.lisp
+++ b/macros.lisp
@@ -272,7 +272,7 @@ Example:
      ((:foo a b)
       (format nil \"foo: ~S, ~S\" a b))
      ((:bar &key a b)
-      (format nil \"bar, ~S, ~S\" a b))
+      (format nil \"bar: ~S, ~S\" a b))
      (((:alt1 :alt2) a)
       (format nil \"alt: ~S\" a))
      ((t &rest rest)