From db5590d2635d5c5341d4ea26e0175bbab08ce1dc Mon Sep 17 00:00:00 2001 From: martin Date: Tue, 21 Jan 2014 16:11:49 +0000 Subject: [PATCH] LazUtils: fix DebuglnEnter with list of 1 argument git-svn-id: trunk@43778 - --- components/lazutils/lazloggerbase.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/components/lazutils/lazloggerbase.pas b/components/lazutils/lazloggerbase.pas index 7426d201e0..94750ce988 100644 --- a/components/lazutils/lazloggerbase.pas +++ b/components/lazutils/lazloggerbase.pas @@ -776,7 +776,7 @@ end; procedure TLazLogger.DebugLnEnter(Args: array of const); begin - if high(Args) > low(Args) then + if high(Args) >= low(Args) then DoDebugLn(ArgsToString(Args)); IncreaseIndent; end; @@ -806,7 +806,7 @@ end; procedure TLazLogger.DebugLnExit(Args: array of const); begin DecreaseIndent; - if high(Args) > low(Args) then + if high(Args) >= low(Args) then DoDebugLn(ArgsToString(Args)); end;