aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/world/net/http/header.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/world/net/http/header.lux')
-rw-r--r--stdlib/source/library/lux/world/net/http/header.lux36
1 files changed, 18 insertions, 18 deletions
diff --git a/stdlib/source/library/lux/world/net/http/header.lux b/stdlib/source/library/lux/world/net/http/header.lux
index 8388a0d5d..61bd78dbc 100644
--- a/stdlib/source/library/lux/world/net/http/header.lux
+++ b/stdlib/source/library/lux/world/net/http/header.lux
@@ -1,26 +1,26 @@
(.using
- [library
- [lux "*"
- [control
- [pipe {"+" case>}]]
- [data
- [text
- ["%" format {"+" format}]]
- [collection
- ["[0]" dictionary {"+" Dictionary}]]]]]
- [// {"+" Header}
- ["[0]" mime {"+" MIME}]
- [// {"+" URL}]])
+ [library
+ [lux "*"
+ [control
+ ["[0]" pipe]]
+ [data
+ [text
+ ["%" format {"+" format}]]
+ [collection
+ ["[0]" dictionary {"+" Dictionary}]]]]]
+ [// {"+" Header}
+ ["[0]" mime {"+" MIME}]
+ [// {"+" URL}]])
(def: .public (has name value)
(-> Text Text Header)
(dictionary.revised' name ""
- (|>> (case>
- ""
- value
-
- previous
- (format previous "," value)))))
+ (|>> (pipe.case
+ ""
+ value
+
+ previous
+ (format previous "," value)))))
(def: .public content_length
(-> Nat Header)