diff options
| -rw-r--r-- | mystringlistunit.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/mystringlistunit.pas b/mystringlistunit.pas index 1155426..98fdb07 100644 --- a/mystringlistunit.pas +++ b/mystringlistunit.pas @@ -670,7 +670,7 @@ begin for i:=0 to count do begin if (i=count) or (bisherLaenge+length(self[i])+byte(i>habIchSchon+1)*length(fuge) > maxLen) then begin wen.append(s+coda); - habIchSchon:=i; + habIchSchon:=i-1; bisherLaenge:=length(praeludium)+length(coda); s:=praeludium; end; |