From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 22 Nov 2004 14:03:02 +0000 (+0000)
Subject: Print cookies in traced request.
X-Git-Tag: 20090517-FFI~1449
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=06ac9e99045bdeadd428d4c5ea10fee9679a01bc;p=mit-scheme.git

Print cookies in traced request.
---

diff --git a/v7/src/ssp/mod-lisp.scm b/v7/src/ssp/mod-lisp.scm
index f2d7030b6..c21ab8031 100644
--- a/v7/src/ssp/mod-lisp.scm
+++ b/v7/src/ssp/mod-lisp.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: mod-lisp.scm,v 1.12 2004/11/18 20:03:16 cph Exp $
+$Id: mod-lisp.scm,v 1.13 2004/11/22 14:03:02 cph Exp $
 
 Copyright 2003,2004 Massachusetts Institute of Technology
 
@@ -157,6 +157,7 @@ USA.
 	(pp `(REQUEST (,(http-message-method request)
 		       ,url
 		       ,@(http-message-url-parameters request))
+		      (COOKIES ,@(http-message-cookies request))
 		      ,@(map (lambda (p)
 			       (list (car p) (cdr p)))
 			     (http-message-headers request)))))