clean up tiling code a teensy bit, and comment on the interaction between focus, master, and cycling direction between the modes

darcs-hash:20070411080747-9c5c1-0f6e9cc92481db8ba812976ee8d3cb0f7dde6626.gz

1 files changed, 3 insertions, 3 deletions

diff --git a/XMonad.hs b/XMonad.hs
index 642a038..0de51ed 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -17,7 +17,7 @@
 module XMonad (
     X, WorkSpace, XState(..), Layout(..), LayoutDesc(..),
     runX, io, withDisplay, isRoot,
-    spawn, trace, whenJust, rot
+    spawn, trace, whenJust, rotateLayout
   ) where
 
 import StackSet (StackSet,WorkspaceId)
@@ -80,8 +80,8 @@ isRoot w = liftM (w==) (gets theRoot)
 data Layout = Full | Tall | Wide deriving (Enum, Bounded, Eq)
 
 -- | 'rot' for Layout.
-rot :: Layout -> Layout
-rot x = if x == maxBound then minBound else succ x
+rotateLayout :: Layout -> Layout
+rotateLayout x = if x == maxBound then minBound else succ x
 
 -- | A full description of a particular workspace's layout parameters.
 data LayoutDesc = LayoutDesc { layoutType   :: !Layout