From ffae6adf662a943a73430b8156b47005f987cb0d Mon Sep 17 00:00:00 2001 From: Steven Barth Date: Mon, 2 Nov 2009 15:40:53 +0000 Subject: Avoid lacking fds --- libs/lucid-http/luasrc/lucid/http/server.lua | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'libs/lucid-http') diff --git a/libs/lucid-http/luasrc/lucid/http/server.lua b/libs/lucid-http/luasrc/lucid/http/server.lua index bc8d53168c..fd5f7cdd8b 100644 --- a/libs/lucid-http/luasrc/lucid/http/server.lua +++ b/libs/lucid-http/luasrc/lucid/http/server.lua @@ -559,11 +559,14 @@ function Server.process(self, client, env) stat, code, msg = client:writeall(table.concat(header, "\r\n")) if sourceout and stat then + local closefd if util.instanceof(sourceout, IOResource) then if not headers["Transfer-Encoding"] then stat, code, msg = sourceout.fd:copyz(client, sourceout.len) + closefd = sourceout.fd sourceout = nil else + closefd = sourceout.fd sourceout = sourceout.fd:blocksource(nil, sourceout.len) end end @@ -571,6 +574,10 @@ function Server.process(self, client, env) if sourceout then stat, msg = ltn12.pump.all(sourceout, sinkout) end + + if closefd then + closefd:close() + end end -- cgit v1.2.3