From 6691b52da8f8bf9fe9f64412848258bb61f411c9 Mon Sep 17 00:00:00 2001
From: vincents <vincents@lazarus-ide.org>
Date: Tue, 16 Mar 2010 20:39:33 +0000
Subject: [PATCH] carbon widgetset: fixed typo introduced in r24011 #eef0d16e78

git-svn-id: trunk@24051 -
---
 lcl/interfaces/carbon/carbonprivatecommon.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/interfaces/carbon/carbonprivatecommon.inc b/lcl/interfaces/carbon/carbonprivatecommon.inc
index a2eb279159..d45e047cf6 100644
--- a/lcl/interfaces/carbon/carbonprivatecommon.inc
+++ b/lcl/interfaces/carbon/carbonprivatecommon.inc
@@ -357,7 +357,7 @@ begin
 
   FillChar(Msg, SizeOf(TLMContextMenu), 0);
   Msg.Msg := LM_CONTEXTMENU;
-  Msg.hWnd := HWND(AWidget)
+  Msg.hWnd := HWND(AWidget);
   Msg.Pos.X := P.X;
   Msg.Pos.Y := P.Y;