Changeset 15251 in project


Ignore:
Timestamp:
07/25/09 16:34:15 (10 years ago)
Author:
sjamaan
Message:

Fix connection handling (simply close connection always)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/xml-rpc/trunk/xml-rpc-server.scm

    r15250 r15251  
    148148             (void)
    149149             (let ((req (read-request in))
    150                    (resp (make-response port: out)))
    151                (handler req resp)))))
     150                   (resp (make-response port: out
     151                                        headers: (headers
     152                                                  `((connection close))))))
     153               (handler req resp)
     154               (close-input-port in)
     155               (close-output-port out)))))
    152156        (accept-next-connection)))))
    153157
Note: See TracChangeset for help on using the changeset viewer.