X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=manager%2Findex.lsp;h=3ad8090fa62cc2fc6d43ea5d857923fe273d3b66;hb=refs%2Fheads%2Fmaster;hp=16003fb1506b69d6408de4d23ee208b655448005;hpb=10d5ff6dcc2a35e5d690216edc16950e4fb022a9;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)