From 78878863ea8c1faaf98a236f71b1366b09e299fb Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Mon, 15 Nov 2010 19:37:38 +0000
Subject: [PATCH] LCL: fix DebugLnEnter/Exit

git-svn-id: trunk@28252 -
---
 lcl/lclproc.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/lclproc.pas b/lcl/lclproc.pas
index a145a594ae..08bfe818b1 100644
--- a/lcl/lclproc.pas
+++ b/lcl/lclproc.pas
@@ -2420,7 +2420,7 @@ begin
     write(DebugText^, s);
   end;
   {$endif}
-  DebugNestAtBOL := (s <> '') and not (s[length(s)] in [#10,#13]);
+  DebugNestAtBOL := (s = '') or (s[length(s)] in [#10,#13]);
 end;
 
 procedure DBGOut(const s1, s2: string);