diff --git a/macros.lisp b/macros.lisp
index 699c6cf23c29397aa2efc3ddbad83b6184e7c103..f06dc843e075866460416e79415db0529da0dbe5 100644
--- a/macros.lisp
+++ b/macros.lisp
@@ -289,7 +289,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))))