From 82f6be23a6c17ffce6040db205992454dc83c840 Mon Sep 17 00:00:00 2001
From: cxl <cxl@f0d560ea-af0d-0410-9eb7-867de7ffcac7>
Date: Mon, 25 Feb 2019 11:27:52 +0000
Subject: [PATCH] CtrlCore: Cocoa control+Click now emulates the right click

git-svn-id: svn://ultimatepp.org/upp/trunk@12799 f0d560ea-af0d-0410-9eb7-867de7ffcac7
---
 uppsrc/CtrlCore/CocoProc.mm | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/uppsrc/CtrlCore/CocoProc.mm b/uppsrc/CtrlCore/CocoProc.mm
index b84babeb2..116ba9521 100644
--- a/uppsrc/CtrlCore/CocoProc.mm
+++ b/uppsrc/CtrlCore/CocoProc.mm
@@ -109,6 +109,17 @@ struct MMImp {
 //			Upp::Ctrl::ReleaseCtrlCapture();
 			return false;
 		}
+		if(GetAlt()) { // Emulate right click
+			if(event == Ctrl::LEFTDOWN) {
+				coco_mouse_left = false;
+				coco_mouse_right = true;
+				event = Ctrl::RIGHTDOWN;
+			}
+			if(event == Ctrl::LEFTUP) {
+				coco_mouse_right = false;
+				event = Ctrl::RIGHTUP;
+			}
+		}
 		NSPoint np = [view convertPoint:[e locationInWindow] fromView:nil];
 		Rect r = view->ctrl->GetRect();
 		Upp::Point p(DPI(np.x), DPI(np.y));