1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
From e789f68895f71b7ad31057177810ca0161bf790e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Pawe=C5=82=20Chmielowski?= <pchmielowski@process-one.net>
Date: Tue, 6 Aug 2019 12:37:28 +0200
Subject: [PATCH] Don't escape ' inside "", this is not valid yaml
This fixes issue #13
---
src/fast_yaml.erl | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/src/fast_yaml.erl b/src/fast_yaml.erl
index db2be4a..11e453c 100644
--- a/src/fast_yaml.erl
+++ b/src/fast_yaml.erl
@@ -146,7 +146,6 @@ encode(B, _) when is_binary(B) ->
($\s) -> [$\s]; % $\s == "space"
($\t) -> [$\\, "t"]; % $\t == "tab"
($\v) -> [$\\, "v"]; % $\v == "vertical tab"
- ($') -> [$\\, $']; % $" == simple quote
($") -> [$\\, $"]; % $" == double quote
($\\) -> [$\\, $\\]; % $\\ == backslash
(C) -> C
@@ -382,7 +381,7 @@ encode_decode_vertical_tab_test() ->
encode_decode_simple_quote_test() ->
FileName = filename:join(["..", "test", "temp_test.yml"]),
- Binary = <<"\'\"\'">>,
+ Binary = <<"'\"'">>,
Encoded = encode([[{'Source', Binary}]]),
file:write_file(FileName, Encoded),
Decoded = decode_from_file(FileName, [plain_as_atom]),
|