From 52f7beebd32cb6acedfac32df7196a6c422ef340 Mon Sep 17 00:00:00 2001 From: Andrea Rossato Date: Thu, 14 Jun 2007 16:44:09 +0200 Subject: TwoPane.hs: info and documentation darcs-hash:20070614144409-32816-a715d99c23403ca4e2c5680da6ba7d23e4f49b68.gz --- TwoPane.hs | 30 ++++++++++++++++++++++++++---- 1 file changed, 26 insertions(+), 4 deletions(-) diff --git a/TwoPane.hs b/TwoPane.hs index 610300d..005be1a 100644 --- a/TwoPane.hs +++ b/TwoPane.hs @@ -1,19 +1,41 @@ --- Maintainer: Spencer Janssen +----------------------------------------------------------------------------- +-- | +-- Module : XMonadContrib.TwoPane +-- Copyright : (c) JSpencer Janssen +-- License : BSD3-style (see LICENSE) +-- +-- Maintainer : Spencer Janssen +-- Stability : unstable +-- Portability : unportable -- -- A layout that splits the screen horizontally and shows two windows. The -- left window is always the master window, and the right is either the -- currently focused window or the second window in layout order. -- --- To use this layout, 'import XMonadContrib.TwoPane' and add --- 'twoPane defaultDelta (1%2)' to the list of layouts +----------------------------------------------------------------------------- -module XMonadContrib.TwoPane where +module XMonadContrib.TwoPane ( + -- * Usage + -- $usage + twoPane + ) where import XMonad import Operations import qualified StackSet as W import Control.Monad.State (gets) + +-- $usage +-- +-- You can use this module with the following in your Config.hs file: +-- +-- > import XMonadContrib.TwoPane +-- +-- and add, to the list of layouts: +-- +-- > twoPane defaultDelta (1%2) + twoPane :: Rational -> Rational -> Layout twoPane delta split = Layout { doLayout = \r -> arrange r . W.integrate, modifyLayout = message } where -- cgit v1.2.3