From c7b7a0b50363cd593680b564ad2600fda65ad732 Mon Sep 17 00:00:00 2001 From: mattias Date: Sat, 26 Jul 2008 16:13:56 +0000 Subject: [PATCH] synedit: not adding spaces if eoScrollPastEOL on line break, bug #11745 git-svn-id: trunk@15875 - --- components/synedit/synedit.pp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/synedit/synedit.pp b/components/synedit/synedit.pp index b744546d02..353f36b547 100644 --- a/components/synedit/synedit.pp +++ b/components/synedit/synedit.pp @@ -8184,7 +8184,7 @@ begin end; Lines.Insert(CaretY, ''); if Command = ecLineBreak then begin - if SpaceCount2 > 0 then + if (SpaceCount2 > 0) and (not (eoScrollPastEol in Options)) then Lines[CaretY] := StringOfChar(' ', SpaceCount2); CaretXY := Point(SpaceCount2 + 1, CaretY + 1); end;