Changeset 97 for trunk/Forms/UFormTest.pas

Timestamp:

Feb 4, 2022, 11:30:24 AM (2 years ago)

Author:

chronos

Message:

• Fixed: Quoted-printable encoded text was not handled correctly for multiple lines.

File:

• trunk/Forms/UFormTest.pas (modified) (1 diff)

trunk/Forms/UFormTest.pas

@@ -146 +146 @@
       Input := VCardBegin + LineEnding +
         VCardVersion + LineEnding +
-        'FN;ENCODING=QUOTED-PRINTABLE:Jm=C3=A9no P=C5=99=C3=ADjmen=C3=AD' + LineEnding +
+        'FN;ENCODING=QUOTED-PRINTABLE:Jm=C3=A9no=20P=C5=99=C3=ADjmen=C3=AD' + LineEnding +
+        VCardEnd + LineEnding;
+      Output := Input;
+    end;
+    with TTestCaseLoadSave(AddNew('Quoted-printable load-save multi-line', TTestCaseLoadSave)) do begin
+      Input := VCardBegin + LineEnding +
+        VCardVersion + LineEnding +
+        'FN;ENCODING=QUOTED-PRINTABLE:Jm=C3=A9no=20P=C5=99=C3=ADjmen=C3=AD=' + LineEnding +
+        'Jm=C3=A9no=20P=C5=99=C3=ADjmen=C3=AD' + LineEnding +
         VCardEnd + LineEnding;
       Output := Input;