From a5df0de237d395b24b097f6d35f700d10b86f6d0 Mon Sep 17 00:00:00 2001 From: Devin Mullins Date: Fri, 12 Oct 2007 04:59:53 +0200 Subject: doco fix: s/SomeLayout/Layout/g darcs-hash:20071012025953-78224-916a50210664192b90802aabb67da486374d0519.gz --- MagicFocus.hs | 6 +++--- MosaicAlt.hs | 4 ++-- Tabbed.hs | 8 ++++---- WindowNavigation.hs | 4 ++-- 4 files changed, 11 insertions(+), 11 deletions(-) diff --git a/MagicFocus.hs b/MagicFocus.hs index 4154049..1fa5647 100644 --- a/MagicFocus.hs +++ b/MagicFocus.hs @@ -25,11 +25,11 @@ import StackSet -- $usage -- > import XMonadContrib.MagicFocus --- > defaultLayouts = [ SomeLayout $ MagicFocus tiled , SomeLayout $ MagicFocus $ Mirror tiled ] +-- > defaultLayouts = [ Layout $ MagicFocus tiled , Layout $ MagicFocus $ Mirror tiled ] -- %import XMonadContrib.MagicFocus --- %layout , SomeLayout $ MagicFocus tiled --- %layout , SomeLayout $ MagicFocus $ Mirror tiled +-- %layout , Layout $ MagicFocus tiled +-- %layout , Layout $ MagicFocus $ Mirror tiled data MagicFocus l a = MagicFocus (l a) deriving ( Show , Read ) diff --git a/MosaicAlt.hs b/MosaicAlt.hs index 73e4f46..322c9e8 100644 --- a/MosaicAlt.hs +++ b/MosaicAlt.hs @@ -43,7 +43,7 @@ import Graphics.X11.Types ( Window ) -- > import XMonadContrib.MosaicAlt -- -- > defaultLayouts = ... --- > , SomeLayout $ MosaicAlt M.empty +-- > , Layout $ MosaicAlt M.empty -- > ... -- -- > keys = ... @@ -55,7 +55,7 @@ import Graphics.X11.Types ( Window ) -- > ... -- %import XMonadContrib.MosaicAlt --- %layout , SomeLayout $ MosaicAlt M.empty +-- %layout , Layout $ MosaicAlt M.empty data HandleWindowAlt = ShrinkWindowAlt Window diff --git a/Tabbed.hs b/Tabbed.hs index 378f20a..c5c1071 100644 --- a/Tabbed.hs +++ b/Tabbed.hs @@ -44,11 +44,11 @@ import XMonadContrib.XUtils -- -- > import XMonadContrib.Tabbed -- --- > defaultLayouts :: [(String, SomeLayout Window)] --- > defaultLayouts = [SomeLayout tiled --- > ,SomeLayout $ Mirror tiled +-- > defaultLayouts :: [(String, Layout Window)] +-- > defaultLayouts = [Layout tiled +-- > ,Layout $ Mirror tiled -- > -- Extension-provided layouts --- > ,SomeLayout $ tabbed shrinkText defaultTConf) +-- > ,Layout $ tabbed shrinkText defaultTConf) -- > , ... ] -- -- You can also edit the default configuration options. diff --git a/WindowNavigation.hs b/WindowNavigation.hs index f6eaec8..52e8456 100644 --- a/WindowNavigation.hs +++ b/WindowNavigation.hs @@ -39,7 +39,7 @@ import XMonadContrib.XUtils -- -- > import XMonadContrib.WindowNavigation -- > --- > defaultLayout = SomeLayout $ windowNavigation defaultWNConfig $ LayoutSelection ... +-- > defaultLayout = Layout $ windowNavigation defaultWNConfig $ LayoutSelection ... -- -- In keybindings: -- @@ -59,7 +59,7 @@ import XMonadContrib.XUtils -- %keybind , ((modMask .|. controlMask, xK_Down), sendMessage $ Swap D) -- %layout -- include 'windowNavigation' in defaultLayout definition above. -- %layout -- just before the list, like the following (don't uncomment next line): --- %layout -- defaultLayout = SomeLayout $ windowNavigation defaultWNConfig $ ... +-- %layout -- defaultLayout = Layout $ windowNavigation defaultWNConfig $ ... data Navigate = Go Direction | Swap Direction deriving ( Read, Show, Typeable ) -- cgit v1.2.3