comments, move isRoot into XMonad

darcs-hash:20070312012350-9c5c1-1753dcb9d066d8954fe5d2f2ed8f5d06a6f976aa

1 files changed, 0 insertions, 4 deletions

diff --git a/Main.hs b/Main.hs
index c023853..8091714 100644
--- a/Main.hs
+++ b/Main.hs
@@ -270,10 +270,6 @@ setTopFocus = do
         Just new -> setFocus new
         Nothing  -> gets theRoot >>= setFocus
 
--- | True if the given window is the root window
-isRoot :: Window -> X Bool
-isRoot w = liftM (w==) (gets theRoot)
-
 -- | raise. focus to window at offset 'n' in list.
 -- The currently focused window is always the head of the list
 raise :: Ordering -> X ()