Ah, you're absolutely right.
Simply binding using LET, instead of WITH-OPEN-STREAM would do the trick then.
Thanks.
-ram
On 9/29/07, Edi Weitz edi@agharta.de wrote:
On Fri, 28 Sep 2007 09:40:15 -0700, "Ram Krishnan" rkris@kriyative.net wrote:
The STREAM returned by SEND-HEADERS can be bound using WITH-OPEN-STREAM and written to using standard Common Lisp I/O functions, e.g.,
(with-open-stream (out (hunchentoot:send-headers)) (write-sequence (make-array pad-len :element-type '(unsigned-byte 8) :initial-element 0) out))
You shouldn't use WITH-OPEN-STREAM here as that will unconditionally close the stream. Hunchentoot must be able to decide whether the stream should be closed or not. _______________________________________________ tbnl-devel site list tbnl-devel@common-lisp.net http://common-lisp.net/mailman/listinfo/tbnl-devel