diff options
| author | David Roundy <droundy@darcs.net> | 2007-08-07 22:16:16 +0200 |
|---|---|---|
| committer | David Roundy <droundy@darcs.net> | 2007-08-07 22:16:16 +0200 |
| commit | 444cf3dd778b2e688e06a6e174b8ee813c8f4c9b (patch) | |
| tree | 456042107b404faec9c0b5113d4ebb2f0ef8fdfa /XMonad.hs | |
| parent | 4fcba00eefa16fa92bdd96bc222edb30365a3784 (diff) | |
| download | xmonad-444cf3dd778b2e688e06a6e174b8ee813c8f4c9b.tar.gz xmonad-444cf3dd778b2e688e06a6e174b8ee813c8f4c9b.tar.xz xmonad-444cf3dd778b2e688e06a6e174b8ee813c8f4c9b.zip | |
move event loop out of mouseDrag.
darcs-hash:20070807201616-72aca-80f5d15118592f79aca8a2e928c4ad4f29fdf8b1.gz
Diffstat (limited to '')
| -rw-r--r-- | XMonad.hs | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -43,7 +43,8 @@ data XState = XState { windowset :: !WindowSet -- ^ workspace list , mapped :: !(S.Set Window) -- ^ the Set of mapped windows , waitingUnmap :: !(M.Map Window Int) -- ^ the number of expected UnmapEvents - , layouts :: !(M.Map WorkspaceId (Layout Window, [Layout Window])) } + , layouts :: !(M.Map WorkspaceId (Layout Window, [Layout Window])) + , dragging :: !(Maybe (Position -> Position -> X (), X ())) } -- ^ mapping of workspaces to descriptions of their layouts data XConf = XConf { display :: Display -- ^ the X11 display |