From 41b25f79a96d5c7cafd3857b61f13c6d1567bc32 Mon Sep 17 00:00:00 2001
From: lazarus <lazarus@lazarus-ide.org>
Date: Sun, 20 Oct 2002 21:49:09 +0000
Subject: [PATCH] MG: fixes for fpc1.1

git-svn-id: trunk@3522 -
---
 lcl/menus.pp | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lcl/menus.pp b/lcl/menus.pp
index 717f1b398e..30fbf7814a 100644
--- a/lcl/menus.pp
+++ b/lcl/menus.pp
@@ -148,7 +148,7 @@ type
     property ActionLink: TMenuActionLink read FActionLink write FActionLink;
     procedure CreateHandle; virtual;
     procedure DestroyHandle; virtual;
-    procedure DoClicked(var msg); message LM_ACTIVATE;  //'activate';
+    procedure DoClicked(var msg); message LM_ACTIVATE;
     function GetHandle: HMenu;
     Procedure SetImageIndex(value : Integer);
     procedure SetGroupIndex(AValue: Byte);
@@ -464,6 +464,9 @@ end.
 
 {
   $Log$
+  Revision 1.29  2002/10/20 21:49:09  lazarus
+  MG: fixes for fpc1.1
+
   Revision 1.28  2002/10/08 22:32:26  lazarus
   MG: fixed cool little bug (menu double attaching bug)