aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux.lux
diff options
context:
space:
mode:
authorEduardo Julian2018-08-22 22:50:33 -0400
committerEduardo Julian2018-08-22 22:50:33 -0400
commit5e13ae0ad68947249a98dc69ab513bdbeca1697e (patch)
tree96f96c209979c095e48bb17f24e3e168385438cc /stdlib/source/lux.lux
parentd2efa1fd37efa50a460dfa609ddd274d82d082e3 (diff)
No more escaping of horizontal-tab.
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux.lux12
1 files changed, 1 insertions, 11 deletions
diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux
index 1b64aa22b..5ffe8d939 100644
--- a/stdlib/source/lux.lux
+++ b/stdlib/source/lux.lux
@@ -5154,17 +5154,7 @@
(def: (text/encode original)
(-> Text Text)
- (let [escaped (|> original
- (replace-all "\t" "\\t")
- (replace-all "\v" "\\v")
- (replace-all "\b" "\\b")
- (replace-all "\n" "\\n")
- (replace-all "\r" "\\r")
- (replace-all "\f" "\\f")
- (replace-all "\"" "\\\"")
- (replace-all "\\" "\\\\")
- )]
- ($_ text/compose "\"" escaped "\"")))
+ ($_ text/compose "\"" original "\""))
(do-template [<name> <extension> <doc>]
[(def: #export (<name> value)