If a Headerline has another : don't cut off there #6

This commit is contained in:
René Linder 2022-02-20 13:45:32 +01:00
parent 88b2126db5
commit 9ef376da1d

View file

@ -109,7 +109,7 @@
EndIf
For CountLines = 2 To Lines
Working_Line = StringField(Working,CountLines,#CRLF$)
Header(LCase(Trim(StringField(Working_Line,1,":")))+":") = Trim(StringField(Working_Line,2,":"))
Header(LCase(Trim(StringField(Working_Line,1,":")))+":") = Trim(Mid(Working_Line, FindString(Working_Line, ":") + 1))
Next
Else
FreeMap(Header())