From 826bff35755e4b2692316f8916facc6f39087158 Mon Sep 17 00:00:00 2001
From: Teddy Wing
Date: Thu, 25 Jul 2019 00:16:06 +0200
Subject: mouse: Add non-functioning Option-Click

Was trying to get this to work a while ago and it's been sitting
uncommitted in my local repo. Commit it just to have it, and try to
figure out how to get it to work later.
---
 mouse.lua | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'mouse.lua')

diff --git a/mouse.lua b/mouse.lua
index fefacb9..8f9e9f0 100644
--- a/mouse.lua
+++ b/mouse.lua
@@ -61,6 +61,16 @@ function mouse.click_down()
 	hs.eventtap.event.newMouseEvent(hs.eventtap.event.types.leftMouseDown, position):post()
 end
 
+-- TODO: Doesn't work
+function mouse.option_click_down()
+	local position = hs.mouse.getAbsolutePosition()
+	hs.eventtap.event.newMouseEvent(
+		hs.eventtap.event.types.leftMouseDown,
+		position,
+		{'option'}
+	):post()
+end
+
 function mouse.click_up()
 	local position = hs.mouse.getAbsolutePosition()
 	hs.eventtap.event.newMouseEvent(hs.eventtap.event.types.leftMouseUp, position):post()
@@ -139,6 +149,7 @@ mouse_mode:bind({}, 'pad2', mouse.bottom(100), nil, mouse.bottom(100))
 mouse_mode:bind({}, 'pad3', mouse.bottom_right(100), nil, mouse.bottom_right(100))
 mouse_mode:bind({}, 'pad4', mouse.left(100), nil, mouse.left(100))
 mouse_mode:bind({}, 'pad5', mouse.click_down, mouse.click_up)
+mouse_mode:bind({'option'}, 'pad5', mouse.option_click_down, mouse.click_up)
 mouse_mode:bind({}, 'pad6', mouse.right(100), nil, mouse.right(100))
 mouse_mode:bind({}, 'pad7', mouse.top_left(100), nil, mouse.top_left(100))
 mouse_mode:bind({}, 'pad8', mouse.top(100), nil, mouse.top(100))
-- 
cgit v1.2.3