From a220b3ccc5120a25daa1f436d4345ad7dfc30fa8 Mon Sep 17 00:00:00 2001 From: Andrea Rossato Date: Thu, 14 Jun 2007 16:35:50 +0200 Subject: Circle.hs: info and documentation darcs-hash:20070614143550-32816-dbb753e8f771f69bc7f0dfb3bdc0df4ac1440415.gz --- Circle.hs | 25 ++++++++++++++++++++++++- 1 file changed, 24 insertions(+), 1 deletion(-) (limited to 'Circle.hs') diff --git a/Circle.hs b/Circle.hs index 18edf17..211d8b9 100644 --- a/Circle.hs +++ b/Circle.hs @@ -1,9 +1,32 @@ -module XMonadContrib.Circle (circle) where -- actually it's an ellipse +----------------------------------------------------------------------------- +-- | +-- Module : XMonadContrib.Circle +-- Copyright : (c) Peter De Wachter +-- License : BSD-style (see LICENSE) +-- +-- Maintainer : Peter De Wachter +-- Stability : unstable +-- Portability : unportable +-- +-- Circle is an elliptical, overlapping layout, by Peter De Wachter +-- +----------------------------------------------------------------------------- + +module XMonadContrib.Circle ( + -- * Usage + -- $usage + circle + ) where -- actually it's an ellipse import Graphics.X11.Xlib import XMonad import StackSet (integrate) +-- $usage +-- You can use this module with the following in your Config.hs file: +-- +-- > import XMonadContrib.Circle + circle :: Layout circle = Layout { doLayout = \r -> circleLayout r . integrate, modifyLayout = return . const Nothing } -- cgit v1.2.3