diff --git a/collects/web-server/scribblings/tutorial/continue.scrbl b/collects/web-server/scribblings/tutorial/continue.scrbl
index 263236034a..5c15cbe8b1 100644
--- a/collects/web-server/scribblings/tutorial/continue.scrbl
+++ b/collects/web-server/scribblings/tutorial/continue.scrbl
@@ -92,11 +92,13 @@ responses.  One basic kind of response is to show an HTML page.
 
 @schemeblock[
  (define html-response/c
+  (flat-rec-contract 
+   html-response
    (or/c string?
-         (or/c (cons/c symbol? (listof html-response/c))
+         (or/c (cons/c symbol? (listof html-response))
                (cons/c symbol?
                        (cons/c (listof (list/c symbol? string?))
-                               (listof html-response/c))))))]
+                               (listof html-response)))))))]
 
 For example: