Change comment for grabButtons in Main.hs

This commit is contained in:
Fabian Beuke 2017-08-11 14:46:19 +02:00 committed by GitHub
parent 2e6312776b
commit 3ec3536761

View File

@ -471,7 +471,7 @@ grabKeys = do
forM_ (keysymToKeycodes sym) $ \kc -> forM_ (keysymToKeycodes sym) $ \kc ->
mapM_ (grab kc . (mask .|.)) =<< extraModifiers mapM_ (grab kc . (mask .|.)) =<< extraModifiers
-- | XXX comment me -- | Grab the buttons
grabButtons :: X () grabButtons :: X ()
grabButtons = do grabButtons = do
XConf { display = dpy, theRoot = rootw } <- ask XConf { display = dpy, theRoot = rootw } <- ask