From fca03c2f20b6207f35237685fd3a3966dfa05014 Mon Sep 17 00:00:00 2001
From: michl <michl@lazarus-ide.org>
Date: Wed, 31 Oct 2018 19:32:05 +0000
Subject: [PATCH] LCL: AnchorDocking: Make able to debug again.

git-svn-id: trunk@59408 -
---
 components/anchordocking/design/anchordesktopoptions.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/components/anchordocking/design/anchordesktopoptions.pas b/components/anchordocking/design/anchordesktopoptions.pas
index c942241997..4d98ea8fbf 100644
--- a/components/anchordocking/design/anchordesktopoptions.pas
+++ b/components/anchordocking/design/anchordesktopoptions.pas
@@ -98,7 +98,7 @@ begin
   Path := Path + 'AnchorDocking/';
   try
     {$IFDEF VerboseAnchorDocking}
-    debugln(['TIDEAnchorDockMaster.LoadUserLayout ',Filename]);
+    debugln(['TIDEAnchorDockMaster.LoadUserLayout ',Path]);
     {$ENDIF}
     if aXMLCfg.GetValue(Path+'MainConfig/Nodes/ChildCount',0) > 0 then//config is not empty
     begin
@@ -215,7 +215,7 @@ begin
   Path := Path + 'AnchorDocking/';
   try
     {$IF defined(VerboseAnchorDocking) or defined(VerboseAnchorDockRestore)}
-    debugln(['TIDEAnchorDockMaster.SaveDefaultLayout ',Filename]);
+    debugln(['TIDEAnchorDockMaster.SaveDefaultLayout ',Path]);
     {$ENDIF}
     SaveLayoutToConfig(Path, aXMLCfg);
   except