diff --git a/2.5DHero/2.5DHero/Modules/Extensions.vb b/2.5DHero/2.5DHero/Modules/Extensions.vb index 43363dca1..22b3992cc 100644 --- a/2.5DHero/2.5DHero/Modules/Extensions.vb +++ b/2.5DHero/2.5DHero/Modules/Extensions.vb @@ -313,7 +313,7 @@ Module Extensions Public Function SplitAtNewline(ByVal s As String) As String() If s.Contains("§") = False Then - Return s.Replace(vbNewLine, "§").Split(CChar("§")) + Return s.Replace(vbNewLine, "§").Replace(vbLf, "§").Split(CChar("§")) Else Dim Data As New List(Of String) @@ -323,7 +323,7 @@ Module Extensions Dim i As Integer = 0 While s <> "" And i < s.Length - If s.Substring(i).StartsWith(vbNewLine) = False Then + If s.Substring(i).StartsWith(vbNewLine) = False Or s.Substring(i).StartsWith(vbLf) = False Then i += 1 Else Data.Add(s.Substring(0, i))