[bknr-cvs] hans changed trunk/thirdparty/hunchentoot/acceptor.lisp

[BKNR Commits]

Revision: 4641
Author: hans
URL: http://bknr.net/trac/changeset/4641

Use FINISH-OUTPUT instead of FORCE-OUTPUT before connection teardown.
Thanks to Ilya Perminov for reporting.

U   trunk/thirdparty/hunchentoot/acceptor.lisp

Modified: trunk/thirdparty/hunchentoot/acceptor.lisp
===================================================================
--- trunk/thirdparty/hunchentoot/acceptor.lisp	2011-01-25 11:43:07 UTC (rev 4640)
+++ trunk/thirdparty/hunchentoot/acceptor.lisp	2011-02-05 07:45:59 UTC (rev 4641)
@@ -323,7 +323,7 @@
                                       :method method
                                       :uri url-string
                                       :server-protocol protocol))))
-              (force-output *hunchentoot-stream*)
+              (finish-output *hunchentoot-stream*)
               (setq *hunchentoot-stream* (reset-connection-stream *acceptor* *hunchentoot-stream*))
               (when *close-hunchentoot-stream*
                 (return)))))
@@ -332,7 +332,7 @@
         ;; errors that may occur while flushing and/or closing the
         ;; stream.
         (ignore-errors*
-          (force-output *hunchentoot-stream*))
+          (finish-output *hunchentoot-stream*))
         (ignore-errors*
           (close *hunchentoot-stream* :abort t))))))