diff --git a/XMonad/Layout/Roledex.hs b/XMonad/Layout/Roledex.hs index 1d4343ee..2a130c1e 100644 --- a/XMonad/Layout/Roledex.hs +++ b/XMonad/Layout/Roledex.hs @@ -10,14 +10,15 @@ -- Stability : unstable -- Portability : unportable -- --- Screenshot : --- -- This is a completely pointless layout which acts like Microsoft's Flip 3D ----------------------------------------------------------------------------- module XMonad.Layout.Roledex ( -- * Usage -- $usage + + -- * Screenshots + -- $screenshot Roledex(Roledex)) where import XMonad @@ -38,6 +39,9 @@ import Data.Ratio -- -- "XMonad.Doc.Extending#Editing_the_layout_hook" +-- $screenshot +-- <> + data Roledex a = Roledex deriving ( Show, Read ) instance LayoutClass Roledex Window where diff --git a/XMonad/Layout/ThreeColumns.hs b/XMonad/Layout/ThreeColumns.hs index ae33f330..7fe0d227 100644 --- a/XMonad/Layout/ThreeColumns.hs +++ b/XMonad/Layout/ThreeColumns.hs @@ -13,14 +13,14 @@ -- A layout similar to tall but with three columns. With 2560x1600 pixels this -- layout can be used for a huge main window and up to six reasonable sized -- slave windows. --- --- Screenshot: --- ----------------------------------------------------------------------------- module XMonad.Layout.ThreeColumns ( -- * Usage -- $usage + + -- * Screenshots + -- $screenshot ThreeCol(..) ) where @@ -55,6 +55,10 @@ import Control.Monad -- -- "XMonad.Doc.Extending#Editing_the_layout_hook" + +-- $screenshot +-- <> + -- | Arguments are nmaster, delta, fraction data ThreeCol a = ThreeColMid { threeColNMaster :: !Int, threeColDelta :: !Rational, threeColFrac :: !Rational} | ThreeCol { threeColNMaster :: !Int, threeColDelta :: !Rational, threeColFrac :: !Rational}