From 2e4c8e102a09c1ccc9cacabcf219dd6e70b8e9e2 Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Mon, 1 Feb 2010 19:51:06 +0000 Subject: [PATCH] pr10727 svn: r17930 --- collects/web-server/scribblings/tutorial/continue.scrbl | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) 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: