From a4fa875050f7a07130850e63c72c45743fa56531 Mon Sep 17 00:00:00 2001 From: Devin Mullins Date: Mon, 12 May 2008 00:21:16 +0200 Subject: X.A.WindowNavigation: TODO darcs-hash:20080511222116-78224-33ad4291ae43467a6060ae6f8b3b2b38ea3b44d6.gz --- XMonad/Actions/WindowNavigation.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/XMonad/Actions/WindowNavigation.hs b/XMonad/Actions/WindowNavigation.hs index 410ac58..ea86413 100644 --- a/XMonad/Actions/WindowNavigation.hs +++ b/XMonad/Actions/WindowNavigation.hs @@ -47,6 +47,7 @@ import Graphics.X11.Xlib -- - solve the 2+3, middle right to bottom left problem -- - manageHook to draw window decos? +-- TODO: more flexible api withWindowNavigation :: (KeySym, KeySym, KeySym, KeySym) -> XConfig l -> IO (XConfig l) withWindowNavigation (u,l,d,r) conf = do posRef <- newIORef M.empty -- cgit v1.2.3