From f14309acc431ce975d92f0e40b57d55e2ccc578f Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Wed, 28 Dec 2011 07:07:30 +0000
Subject: [PATCH] fix MouseUpDownEvent result

git-svn-id: trunk@34461 -
---
 lcl/interfaces/cocoa/cocoawscommon.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lcl/interfaces/cocoa/cocoawscommon.pas b/lcl/interfaces/cocoa/cocoawscommon.pas
index cddbd22d53..48667c5166 100644
--- a/lcl/interfaces/cocoa/cocoawscommon.pas
+++ b/lcl/interfaces/cocoa/cocoawscommon.pas
@@ -286,7 +286,7 @@ begin
       Msg.Msg := CheckMouseButtonDown(MButton);
 
       NotifyApplicationUserInput(Msg.Msg);
-      Result := DeliverMessage(Msg) = 0;
+      Result := DeliverMessage(Msg) <> 0;
     end;
     NSLeftMouseUp,
     NSRightMouseUp,
@@ -297,7 +297,7 @@ begin
       Msg.Msg := MSGKINDUP[MButton];
 
       NotifyApplicationUserInput(Msg.Msg);
-      Result := DeliverMessage(Msg) = 0;
+      Result := DeliverMessage(Msg) <> 0;
     end;
   end;
 end;