diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/lux/data/format/json.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/lux/data/format/json.lux b/stdlib/source/lux/data/format/json.lux index d9ef60605..66ad6c093 100644 --- a/stdlib/source/lux/data/format/json.lux +++ b/stdlib/source/lux/data/format/json.lux @@ -190,7 +190,7 @@ (do-template [<name> <tag> <type> <desc>] [(def: #export (<name> key json) - {#;doc (#;TextM (format "A JSON object field getter for " <desc> "."))} + {#;doc (#;TextA (format "A JSON object field getter for " <desc> "."))} (-> Text JSON (Error <type>)) (case (get key json) (#;Right (<tag> value)) @@ -211,7 +211,7 @@ (do-template [<name> <type> <tag> <desc>] [(def: #export (<name> value) - {#;doc (#;TextM (format "A JSON generator for " <desc> "."))} + {#;doc (#;TextA (format "A JSON generator for " <desc> "."))} (Gen <type>) (<tag> value))] @@ -398,7 +398,7 @@ ## Syntax (do-template [<name> <type> <tag> <desc> <pre>] [(def: #export (<name> json) - {#;doc (#;TextM (format "Reads a JSON value as " <desc> "."))} + {#;doc (#;TextA (format "Reads a JSON value as " <desc> "."))} (Parser <type>) (case json (<tag> value) @@ -416,7 +416,7 @@ (do-template [<test> <check> <type> <eq> <codec> <tag> <desc> <pre>] [(def: #export (<test> test json) - {#;doc (#;TextM (format "Asks whether a JSON value is a " <desc> "."))} + {#;doc (#;TextA (format "Asks whether a JSON value is a " <desc> "."))} (-> <type> (Parser Bool)) (case json (<tag> value) @@ -426,7 +426,7 @@ (#;Left (format "JSON value is not a " <desc> ": " (show-json json))))) (def: #export (<check> test json) - {#;doc (#;TextM (format "Ensures a JSON value is a " <desc> "."))} + {#;doc (#;TextA (format "Ensures a JSON value is a " <desc> "."))} (-> <type> (Parser Unit)) (case json (<tag> value) |