Browse Source

Specify MI use in About Dialog

git-svn-id: trunk@34208 -
pierre 9 years ago
parent
commit
af8cf223ca
1 changed files with 4 additions and 0 deletions
  1. 4 0
      ide/fpviews.pas

+ 4 - 0
ide/fpviews.pas

@@ -4272,7 +4272,11 @@ begin
   if pos('Fake',GDBVersion)=0 then
     begin
       R2.Move(0,1);
+      {$ifdef GDBMI}
+      Insert(New(PStaticText, Init(R2, FormatStrStr2(^C'(%s %s, using MI interface)',label_about_debugger,GDBVersion))));
+      {$else}
       Insert(New(PStaticText, Init(R2, FormatStrStr2(^C'(%s %s)',label_about_debugger,GDBVersion))));
+      {$endif}
       R2.Move(0,1);
     end
   else