delete debug prints

main
Daniel Barlow 2022-09-13 20:56:11 +01:00
parent f75b8bd59a
commit 1928ff0681
2 changed files with 0 additions and 3 deletions

View File

@ -2,7 +2,6 @@
(local { : view } (require :fennel))
(fn handler [payload]
(print (view payload))
"OK")

View File

@ -10,10 +10,8 @@
(rh:append ":status" :200)
(rh:append :content-type :text/plain)
(out:write_headers rh false)
(print "got oune" handler)
(let [(obj pos err) (json.decode (out:get_body_as_string) 1 nil)
ret (handler obj)]
(out:write_chunk ret true))))
(fn new-server [handler]