The code below does not produce valid output in AOL 4.5.1. But why?..
ns_register_proc GET /headers ad_headers_proc
proc ad_headers_proc {ignore} {
set result {}
set headers [ns_conn headers]
for {set i 0} {$i < [ns_set size $headers]} {incr i} {
set key [ns_set key $headers $i]
set value [ns_set value $headers $i]
append result "$key: $value\n"
}
ns_updateheader Content-Encoding gzip
ns_return 200 text/plain [ns_zlib gzip $result]
}
--
Best regards, Alexey Pechnikov.
http://pechnikov.tel/
--
AOLserver - http://www.aolserver.com/
To Remove yourself from this list, simply send an email to
<[email protected]> with the
body of "SIGNOFF AOLSERVER" in the email message. You can leave the Subject:
field of your email blank.
