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;