X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=manager%2Findex.lsp;h=3ad8090fa62cc2fc6d43ea5d857923fe273d3b66;hb=a0971e1ea5dd4963e51a5dd0c24d90c443c1dc84;hp=16003fb1506b69d6408de4d23ee208b655448005;hpb=71a0489975b6126f6a3129d1837b63912c4c427a;p=rrq%2Fhourglass.git diff --git a/manager/index.lsp b/manager/index.lsp index 16003fb..3ad8090 100644 --- a/manager/index.lsp +++ b/manager/index.lsp @@ -1,6 +1,4 @@ (load "expand-string.lsp") -(write-line 2 (string "index.lsp")) -(write-line 2 (string (expand-file "tmpl/index-page.html"))) (println "Status 200 OK\nContent-Type: text/html\n\n") (println (expand-file "tmpl/index-page.html")) (exit 0)