Remove commented code

darcs-hash:20071004200200-a5988-43e27252ed8a109311d5a82ec1ed9b31c345fb6e

1 files changed, 0 insertions, 7 deletions

diff --git a/XMonad.hs b/XMonad.hs
index 0db0eac..818586f 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -229,13 +229,6 @@ whenJust mg f = maybe (return ()) f mg
 whenX :: X Bool -> X () -> X ()
 whenX a f = a >>= \b -> when b f
 
--- Grab the X server (lock it) from the X monad
--- withServerX :: X () -> X ()
--- withServerX f = withDisplay $ \dpy -> do
---     io $ grabServer dpy
---     f
---     io $ ungrabServer dpy
-
 -- | A 'trace' for the X monad. Logs a string to stderr. The result may
 -- be found in your .xsession-errors file
 trace :: String -> X ()