From a6d184669d1201d82863fe58b09cdc0117787aa7 Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Tue, 6 Jul 2010 15:14:40 +0000
Subject: Add Content-Length to stream template.

---
 app/template-stream.lsp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/app/template-stream.lsp b/app/template-stream.lsp
index 88713fd..d97fd11 100644
--- a/app/template-stream.lsp
+++ b/app/template-stream.lsp
@@ -1,6 +1,7 @@
 <% local viewtable, viewlibrary, pageinfo, session = ... %>
 Status: 200 OK
 Content-Type: <% print(viewtable.option or "application/octet-stream") %>
+Content-Length: <%= #viewtable.value %>
 <% if viewtable.label ~= "" then %>
 Content-Disposition: attachment; filename="<%= viewtable.label %>"
 <% end %>
-- 
cgit v1.2.3