aboutsummaryrefslogtreecommitdiffstats
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
commit768b420eb81e7a65447cd26663b2f8c95986095e (patch)
treebba19c0b2ae7f53926386d6ec68cb679bd05b417 /XMonad/Core.hs
parentb67f9f0c258bc773d7c9e0266371ba632b86a32e (diff)
downloadxmonad-768b420eb81e7a65447cd26663b2f8c95986095e.tar.gz
xmonad-768b420eb81e7a65447cd26663b2f8c95986095e.tar.xz
xmonad-768b420eb81e7a65447cd26663b2f8c95986095e.zip
Track mouse position via events received
darcs-hash:20081007203953-25a6b-820e60a7db931a5e5e27ab8736643aea932ca3ec.gz
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