diff options
author | Erich Eckner <git@eckner.net> | 2018-01-08 15:46:03 +0100 |
---|---|---|
committer | Erich Eckner <git@eckner.net> | 2018-01-08 15:46:03 +0100 |
commit | ce843fd0be7e5f7c065c317123c24f93987ee665 (patch) | |
tree | db94660d658291c9acb784e8322aa4b6f8730e8b | |
parent | d566acbba1080b69e580093a053b3f914caa8746 (diff) | |
download | units-ce843fd0be7e5f7c065c317123c24f93987ee665.tar.xz |
mystringlistunit.pas: bugfix in appendTo
-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; |