1
0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-07-28 18:51:51 -07:00

X.A.WindowNavigation: TODO

This commit is contained in:
Devin Mullins
2008-05-11 22:21:16 +00:00
parent 8f0b9fa066
commit 255a04753e

@@ -47,6 +47,7 @@ import Graphics.X11.Xlib
-- - solve the 2+3, middle right to bottom left problem -- - solve the 2+3, middle right to bottom left problem
-- - manageHook to draw window decos? -- - manageHook to draw window decos?
-- TODO: more flexible api
withWindowNavigation :: (KeySym, KeySym, KeySym, KeySym) -> XConfig l -> IO (XConfig l) withWindowNavigation :: (KeySym, KeySym, KeySym, KeySym) -> XConfig l -> IO (XConfig l)
withWindowNavigation (u,l,d,r) conf = do withWindowNavigation (u,l,d,r) conf = do
posRef <- newIORef M.empty posRef <- newIORef M.empty