debugged for change in data directory

[rrq/hourglass.git] / manager / history.lsp

diff --git a/manager/history.lsp b/manager/history.lsp
index 2192ac5be7f4e2db67756004c8efd9f54a3b575a..fdf12198c59c74622889e89f8977fe3070db3a25 100644 (file)
--- a/manager/history.lsp
+++ b/manager/history.lsp
@@ -44,6 +44,7 @@
 
 (setf MAP (map (fn (x) (list (x 0) (mkmap (1 x)))) MAP))
 
+(println "Status 200 OK\nContent-Type: text/html\n\n")
 (println (expand-file "tmpl/history-page.html"))
 (exit 0)
 (load