summaryrefslogtreecommitdiffstats
path: root/XMonad/Core.hs
diff options
context:
space:
mode:
authorSpencer Janssen <spencerjanssen@gmail.com>2008-10-07 22:39:53 +0200
committerSpencer Janssen <spencerjanssen@gmail.com>2008-10-07 22:39:53 +0200
commitf2015e3a8da76ad819ce3968f057ab10974ec656 (patch)
treebba19c0b2ae7f53926386d6ec68cb679bd05b417 /XMonad/Core.hs
parent27c8f42e9fc273d70a3e3be6c08e8a601787de7e (diff)
downloadmetatile-f2015e3a8da76ad819ce3968f057ab10974ec656.tar
metatile-f2015e3a8da76ad819ce3968f057ab10974ec656.zip
Track mouse position via events received
darcs-hash:20081007203953-25a6b-820e60a7db931a5e5e27ab8736643aea932ca3ec
Diffstat (limited to 'XMonad/Core.hs')
-rw-r--r--XMonad/Core.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/XMonad/Core.hs b/XMonad/Core.hs
index 1bc289a..a6ee797 100644
--- a/XMonad/Core.hs
+++ b/XMonad/Core.hs
@@ -70,6 +70,9 @@ data XConf = XConf
, buttonActions :: !(M.Map (KeyMask, Button) (Window -> X ()))
-- ^ a mapping of button presses to actions
, mouseFocused :: !Bool -- ^ was refocus caused by mouse action?
+ , mousePosition :: !(Maybe (Position, Position))
+ -- ^ position of the mouse according to
+ -- the event currently being processed
}
-- todo, better name