From 80caa28387bc178c7b8f53500016878770c8137b Mon Sep 17 00:00:00 2001
From: Ryan Kavanagh <rak@debian.org>
Date: Sun, 2 Sep 2018 21:04:19 -0400
Subject: Add killing using the trackball buttons
---
.xmonad/xmonad.hs | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs
index ac82d8a..60b435c 100644
--- a/.xmonad/xmonad.hs
+++ b/.xmonad/xmonad.hs
@@ -73,8 +73,9 @@ myMouseBindings (XConfig {XMonad.modMask = modMask}) = fromList $
-- you may also bind events to the mouse scroll wheel (button4 and button5)
, ((modMask, button5), (\_ -> moveTo Next NonEmptyWS))
, ((modMask, button4), (\_ -> moveTo Prev NonEmptyWS ))
- -- scroll wheel click
+ -- scroll wheel click, bottom right corner on trackball
, ((modMask, 6), (\w -> focus w >> kill))
+ , ((modMask, 8), (\w -> focus w >> kill))
]
mykeys x = [
--
cgit v1.2.3