add support for Content-Encoding header

2025-05-27 14:59:41 -07:00
parent 978ae8fd03
commit 460b269736
2 changed files with 27 additions and 13 deletions
--- a/srv/main.hy
+++ b/srv/main.hy
@ -39,7 +39,8 @@
                    True (get address 0))) f": {(. parsed-request (get "method"))} {(. parsed-request (get "route") (get "path"))}"))

                  (setv response (match-request parsed-request))
-                  (.sendall client-socket (http.response.send #** response))
+                  (print (.get parsed-request "headers"))
+                  (.sendall client-socket (http.response.send :request-headers (.get parsed-request "headers") #** response))

                  (except [e Exception]
                    (.warn log (format-exc))