diff --git a/components/lazdebuggers/lazdebuggerfplldb/fplldbdebugger.pas b/components/lazdebuggers/lazdebuggerfplldb/fplldbdebugger.pas
index 1cc9da7415..2e021e2cb7 100644
--- a/components/lazdebuggers/lazdebuggerfplldb/fplldbdebugger.pas
+++ b/components/lazdebuggers/lazdebuggerfplldb/fplldbdebugger.pas
@@ -823,8 +823,7 @@ begin
     exit;
   end;
 
-//  s := CallStack.CurrentCallStackList.EntriesForThreads[AThreadId];
-  s := CallStack.CurrentCallStackList.EntriesForThreads[0];
+  s := CallStack.CurrentCallStackList.EntriesForThreads[AThreadId];
   if s = nil then begin
     DebugLn(DBG_ERRORS, ['NO Stackframe list for thread']);
     exit;