aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad.hs
diff options
context:
space:
mode:
authorDavid Roundy <droundy@darcs.net>2007-10-17 22:14:06 +0200
committerDavid Roundy <droundy@darcs.net>2007-10-17 22:14:06 +0200
commit36f5400769971e11ed44dfc9aa09599c37f1a666 (patch)
treed86783436bd7df040b8484ed1165277cbdf2da98 /XMonad.hs
parent963a805b2d22bdb750ba28181f578d664f8448c3 (diff)
downloadxmonad-36f5400769971e11ed44dfc9aa09599c37f1a666.tar.gz
xmonad-36f5400769971e11ed44dfc9aa09599c37f1a666.tar.xz
xmonad-36f5400769971e11ed44dfc9aa09599c37f1a666.zip
remove StackOrNot type synonymn.
darcs-hash:20071017201406-72aca-2845317199eb5888392c1b2fa9004d29f59d6c5c.gz
Diffstat (limited to 'XMonad.hs')
-rw-r--r--XMonad.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad.hs b/XMonad.hs
index 1ce1aa7..fc06885 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -204,7 +204,7 @@ instance ReadableLayout a => LayoutClass Layout a where
instance Show (Layout a) where show (Layout l) = show l
-- | This calls doLayout if there are any windows to be laid out.
-runLayout :: LayoutClass l a => l a -> Rectangle -> StackOrNot a -> X ([(a, Rectangle)], Maybe (l a))
+runLayout :: LayoutClass l a => l a -> Rectangle -> Maybe (Stack a) -> X ([(a, Rectangle)], Maybe (l a))
runLayout l r = maybe (return ([], Nothing)) (doLayout l r)
-- | Based on ideas in /An Extensible Dynamically-Typed Hierarchy of Exceptions/,