Posted to tcl by patthoyts at Sat Nov 21 22:10:13 GMT 2009view raw
- Index: Wub/Httpd.tcl
- ===================================================================
- --- Wub/Httpd.tcl (revision 2074)
- +++ Wub/Httpd.tcl (working copy)
- @@ -359,6 +359,9 @@
- set si "The Wub"
- }
- append header "Server: $si" \r\n
- + dict for {k v} [dict get? $reply -headers] {
- + append header $k ": " $v \r\n
- + }
- }
- # add in cookies already formatted up
- p