From c85a3186c5116be2a0b3f99056af574e3aedff19 Mon Sep 17 00:00:00 2001 From: Andrea Rossato Date: Sun, 10 Feb 2008 12:31:59 +0100 Subject: SimpleFloat: export SimpleFloat and add documentation darcs-hash:20080210113159-32816-4821b7c8d4d18ec8c5d47c7b1620f280f2c9625c.gz --- XMonad/Layout/SimpleFloat.hs | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/XMonad/Layout/SimpleFloat.hs b/XMonad/Layout/SimpleFloat.hs index cd90306..4aa8e4f 100644 --- a/XMonad/Layout/SimpleFloat.hs +++ b/XMonad/Layout/SimpleFloat.hs @@ -18,6 +18,7 @@ module XMonad.Layout.SimpleFloat simpleFloat , simpleFloat' , SimpleDecoration (..) + , SimpleFloat (..) , shrinkText, CustomShrink(CustomShrink) , Shrinker(..) ) where @@ -43,13 +44,17 @@ import XMonad.Layout.WindowArranger -- -- "XMonad.Doc.Extending#Editing_the_layout_hook" --- | FIXME +-- | A simple floating layout where every window is placed according +-- to the window's initial attributes. +-- +-- This version is decorated with the 'SimpleDecoration' style. simpleFloat :: ModifiedLayout (Decoration SimpleDecoration DefaultShrinker) (ModifiedLayout WindowArranger SimpleFloat) a simpleFloat = decoration shrinkText defaultTheme (Simple False) (windowArrangeAll $ SF 20) --- | FIXME -simpleFloat' :: Shrinker s => s -> Theme -> +-- | Same as 'simpleFloat', but with the possibility of setting a +-- custom shrinker and a custom theme. +simpleFloat' :: Shrinker s => s -> Theme -> ModifiedLayout (Decoration SimpleDecoration s) (ModifiedLayout WindowArranger SimpleFloat) a simpleFloat' s c = decoration s c (Simple False) (windowArrangeAll $ SF (decoHeight c)) -- cgit v1.2.3