aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/data/format/css.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/data/format/css.lux')
-rw-r--r--stdlib/source/library/lux/data/format/css.lux12
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/library/lux/data/format/css.lux b/stdlib/source/library/lux/data/format/css.lux
index 90cb8ad54..8d44055ea 100644
--- a/stdlib/source/library/lux/data/format/css.lux
+++ b/stdlib/source/library/lux/data/format/css.lux
@@ -10,7 +10,7 @@
["%" format {"+" [format]}]
["[0]" encoding {"+" [Encoding]}]]
[collection
- ["[0]" list ("[1]\[0]" functor)]]]
+ ["[0]" list ("[1]#[0]" functor)]]]
[type
abstract]
[world
@@ -51,8 +51,8 @@
(-> Font (CSS Special))
(let [with_unicode (case (value@ /font.#unicode_range font)
{.#Some unicode_range}
- (let [unicode_range' (format "U+" (\ nat.hex encoded (value@ /font.#start unicode_range))
- "-" (\ nat.hex encoded (value@ /font.#end unicode_range)))]
+ (let [unicode_range' (format "U+" (# nat.hex encoded (value@ /font.#start unicode_range))
+ "-" (# nat.hex encoded (value@ /font.#end unicode_range)))]
(list ["unicode-range" unicode_range']))
{.#None}
@@ -63,7 +63,7 @@
["font-style" (|> font (value@ /font.#style) (maybe.else /value.normal_style) /value.value)]
["font-weight" (|> font (value@ /font.#weight) (maybe.else /value.normal_weight) /value.value)]
with_unicode)
- (list\each (function (_ [property value])
+ (list#each (function (_ [property value])
(format property ": " value ";")))
(text.interposed /style.separator)
(text.enclosed ["{" "}"])
@@ -93,7 +93,7 @@
(-> (Value Animation) (List Frame) (CSS Special))
(:abstraction (format "@keyframes " (/value.value animation) " {"
(|> frames
- (list\each (function (_ frame)
+ (list#each (function (_ frame)
(format (/value.percentage (value@ #when frame)) " {"
(/style.inline (value@ #what frame))
"}")))
@@ -113,7 +113,7 @@
(|> css
:representation
(text.all_split_by ..css_separator)
- (list\each (|>> (format (/selector.selector (|> selector (combinator (/selector.tag "")))))))
+ (list#each (|>> (format (/selector.selector (|> selector (combinator (/selector.tag "")))))))
(text.interposed ..css_separator)
:abstraction))