Fix mixed indents in block strings, attempt 2 (#78)

Author: janedbal

src/Neon/Encoder.php

@@ -64,7 +64,7 @@ public function valueToNode(mixed $val, bool $blockMode = false): Node
 			return $node;
 
 		} elseif (is_string($val) && Lexer::requiresDelimiters($val)) {
-			return new Node\StringNode($val);
+			return new Node\StringNode($val, $this->indentation);
 
 		} else {
 			return new Node\LiteralNode($val);

src/Neon/Node/StringNode.php

@@ -23,6 +23,7 @@ final class StringNode extends Node
 
 	public function __construct(
 		public string $value,
+		public string $indentation = "\t",
 	) {
 	}
 
@@ -89,7 +90,7 @@ public function toString(): string
 			$delim = "'''";
 		}
 
-		$s = preg_replace('#^(?=.)#m', "\t", $s);
+		$s = preg_replace('#^(?=.)#m', $this->indentation, $s);
 		return $delim . "\n" . $s . "\n" . $delim;
 	}
 }

tests/Neon/Encoder.phpt

@@ -180,3 +180,8 @@ Assert::same(
 	"\"\"\"\n\tspecial\\r\n\tchars\n\"\"\"",
 	Neon::encode("special\r\nchars", true),
 );
+
+Assert::same(
+	"inner:\n    msg: '''\n        string\n        with newline\n    '''\n\n",
+	Neon::encode(['inner' => ['msg' => "string\nwith newline"]], true, '    '),
+);

tests/Neon/fixtures/Encoder.nodes.txt

@@ -306,6 +306,7 @@ Nette\Neon\Node\InlineArrayNode
    |  |  |  value: string
    |  |  |  |  'hello\n
    |  |  |  |   world'
+   |  |  |  indentation: '\t    '
    |  |  |  startTokenPos: null
    |  |  |  endTokenPos: null
    |  |  |  start: null

tests/Neon/fixtures/Parser.nodes.txt

@@ -993,6 +993,7 @@ Nette\Neon\Node\BlockArrayNode
    |  |  |  value: string
    |  |  |  |  'one\n
    |  |  |  |   two'
+   |  |  |  indentation: '\t    '
    |  |  |  startTokenPos: unset
    |  |  |  endTokenPos: unset
    |  |  |  start: Nette\Neon\Position