Changeset 116 for trunk/UContact.pas

Timestamp:

Feb 15, 2022, 5:09:10 PM (2 years ago)

Author:

chronos

Message:

• Fixed: Fully disable automatic max. line width detection.
• Added: More tests.
• Added: Show number of passing and failing tests in test window.

File:

• trunk/UContact.pas (modified) (2 diffs)

trunk/UContact.pas

@@ -1623 +1623 @@
   while I < Lines.Count do begin
     Line := Lines[I];
-    DetectMaxLineLength(Line);
+    //DetectMaxLineLength(Line);
 
     if Line = '' then begin
@@ -1652 +1652 @@
           if I >= Lines.Count then Break;
           Line2 := Lines[I];
-          DetectMaxLineLength(Line2);
+          //DetectMaxLineLength(Line2);
           if (Length(Line2) > 0) and (Line2[1] = ' ') then begin
             Value := Value + Copy(Line2, 2, MaxInt);