Browse Source

Merged revision 27305 from http://svn.freepascal.org/svn/fpc/trunk
------------------------------------------------------------------------
r27305 | pierre | 2014-03-27 23:55:45 +0100 (Thu, 27 Mar 2014) | 1 line

Avoid RTE 219 if compiled with -CR, by using correct common ancestor
------------------------------------------------------------------------

git-svn-id: branches/fixes_2_6@27316 -

pierre 11 years ago
parent
commit
96e466bd9f
1 changed files with 1 additions and 1 deletions
  1. 1 1
      ide/fpmwnd.inc

+ 1 - 1
ide/fpmwnd.inc

@@ -78,7 +78,7 @@ begin
     hcCalcWindow   : S:=PCalculator(P)^.GetTitle(MaxLen);
     hcBrowserWindow: S:=PBrowserWindow(P)^.GetTitle(MaxLen);
     hcCompilerMessagesWindow,
-    hcMessagesWindow:S:=PMessagesWindow(P)^.GetTitle(MaxLen);
+    hcMessagesWindow:S:=PFPWindow(P)^.GetTitle(MaxLen);
     hcGDBWindow,
     hcDisassemblyWindow,
     hcWatchesWindow,