From 80caa28387bc178c7b8f53500016878770c8137b Mon Sep 17 00:00:00 2001 From: Ryan Kavanagh 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