diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/library/lux/world/net/http/response.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/library/lux/world/net/http/response.lux b/stdlib/source/library/lux/world/net/http/response.lux index 272e906b5..77b2ef773 100644 --- a/stdlib/source/library/lux/world/net/http/response.lux +++ b/stdlib/source/library/lux/world/net/http/response.lux @@ -4,7 +4,7 @@ [control [concurrency ["[0]" async] - ["[0]" frp ("[1]\[0]" monad)]]] + ["[0]" frp ("[1]#[0]" monad)]]] [data ["[0]" text ["[0]" encoding]] @@ -12,7 +12,7 @@ ["[0]" html] ["[0]" css {"+" [CSS]}] ["[0]" context] - ["[0]" json {"+" [JSON]} ("[1]\[0]" codec)]]] + ["[0]" json {"+" [JSON]} ("[1]#[0]" codec)]]] ["[0]" io] [world ["[0]" binary {"+" [Binary]}]]]] @@ -29,7 +29,7 @@ (def: .public empty (-> Status Response) - (let [body (frp\in (\ encoding.utf8 encoded ""))] + (let [body (frp#in (# encoding.utf8 encoded ""))] (function (_ status) [status [//.#headers (|> context.empty @@ -52,11 +52,11 @@ [//.#headers (|> context.empty (header.content_length (binary.size data)) (header.content_type type)) - //.#body (frp\in data)]]) + //.#body (frp#in data)]]) (def: .public bad_request (-> Text Response) - (|>> (\ encoding.utf8 encoded) (content status.bad_request mime.utf_8))) + (|>> (# encoding.utf8 encoded) (content status.bad_request mime.utf_8))) (def: .public ok (-> MIME Binary Response) @@ -65,10 +65,10 @@ (template [<name> <type> <mime> <pre>] [(def: .public <name> (-> <type> Response) - (|>> <pre> (\ encoding.utf8 encoded) (..ok <mime>)))] + (|>> <pre> (# encoding.utf8 encoded) (..ok <mime>)))] [text Text mime.utf_8 (<|)] [html html.Document mime.html html.html] [css CSS mime.css css.css] - [json JSON mime.json json\encoded] + [json JSON mime.json json#encoded] ) |