From 7b1fafdd6af01bd7d4988181994f9d4a8c38f407 Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Mon, 26 Feb 2018 21:53:28 +0000
Subject: [PATCH] Debugger, GDBMI: debug inspector, display errors in status
 bar

git-svn-id: trunk@57381 -
---
 debugger/inspectdlg.pas     | 2 +-
 ide/lazarusidestrconsts.pas | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/debugger/inspectdlg.pas b/debugger/inspectdlg.pas
index b9ee9ad506..e248c2a993 100644
--- a/debugger/inspectdlg.pas
+++ b/debugger/inspectdlg.pas
@@ -863,7 +863,7 @@ begin
     begin
       FreeAndNil(FDBGInfo);
       Clear;
-      StatusBar1.SimpleText:=Format(lisInspectUnavailable, [ShortenedExpression]);
+      StatusBar1.SimpleText:=Format(lisInspectUnavailableError, [ShortenedExpression, FHumanReadable]);
       Exit;
     end;
     case FDBGInfo.Kind of
diff --git a/ide/lazarusidestrconsts.pas b/ide/lazarusidestrconsts.pas
index 6f6f9093a0..3309418e88 100644
--- a/ide/lazarusidestrconsts.pas
+++ b/ide/lazarusidestrconsts.pas
@@ -556,7 +556,7 @@ resourcestring
   lisInspectShowColType = 'Show type column';
   lisInspectShowColVisibility = 'Show visibility column';
   lisInspectClassInherit = '%s : Class %s inherits from %s';
-  lisInspectUnavailable = '%s : unavailable';
+  lisInspectUnavailableError = '%s : unavailable (Error: %s)';
   lisInspectPointerTo = 'Pointer to %s';
   lisColClass = 'Class';
   lisColVisibility = 'Visibility';