dan
/
certifix
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

inline not-found function

This commit is contained in:
Daniel Barlow 2024-09-26 21:34:37 +01:00
parent afd3088cee
commit e410cef1f4
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
main.fnl
View File

@ -33,8 +33,6 @@
false)
(out:write_chunk text true))
(fn not-found [out] (send-error out 404 "not found"))
(fn slurp [filename]
(with-open [f (io.open filename "r")] (f:read "*a")))
@ -79,7 +77,7 @@
"/sign"
(handle-sign-csr out)
_
(not-found out))))
(send-error out 404 "not found"))))
(fn new-server []