Fixed the tokenizer path in exported provider configurations (#1076)

app/SharedTools/LuaTools.cs

@@ -18,13 +18,22 @@ public static class LuaTools
     public static string ToLuaStringLiteral(string? value, bool forceLongString = false, int longStringLengthThreshold = 80)
     {
         value ??= string.Empty;
-        if (!forceLongString &&
-            value.Length <= longStringLengthThreshold &&
-            !value.Contains('\n') &&
-            !value.Contains('\r'))
+
+        //
+        // Lua reads every kind of line break in a long string as \n. A carriage return therefore
+        // survives only in a quoted string, where it is escaped, even when a long string was asked for:
+        //
+        if (value.Contains('\r') || (!forceLongString &&
+                                     value.Length <= longStringLengthThreshold &&
+                                     !value.Contains('\n')))
             return $"\"{EscapeLuaString(value)}\"";
 
-        return $"{CreateLongStringOpeningDelimiter(value)}{value}{CreateLongStringClosingDelimiter(value)}";
+        //
+        // Lua also drops a line break right after the opening bracket, so a text which starts with
+        // one gets another one in front:
+        //
+        var skippedLineBreak = value.StartsWith('\n') ? "\n" : string.Empty;
+        return $"{CreateLongStringOpeningDelimiter(value)}{skippedLineBreak}{value}{CreateLongStringClosingDelimiter(value)}";
     }
 
     private static string CreateLongStringOpeningDelimiter(string value)
@@ -41,8 +50,13 @@ public static class LuaTools
 
     private static string CreateLongStringEquals(string value)
     {
+        //
+        // The closing bracket must neither occur in the text nor be completed by its end. A text
+        // which ends with "]===" would otherwise form "]===]" with the first character of the
+        // closing bracket, and Lua ends the string right there:
+        //
         var equalsCount = 3;
-        while (value.Contains($"]{new string('=', equalsCount)}]"))
+        while (value.Contains($"]{new string('=', equalsCount)}]") || value.EndsWith($"]{new string('=', equalsCount)}", StringComparison.Ordinal))
             equalsCount++;
 
         return new string('=', equalsCount);