From 774ee4975da2be3d11ed3f08ca12d0b0f36786f1 Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Sun, 22 Feb 2009 00:06:28 +0100 Subject: Use records to document Tall's arguments Ignore-this: 253c09de793715c18a029406795a42fd darcs-hash:20090221230628-25a6b-7ea69e8aba9a539a05d096fed041852fb1df040c --- XMonad/Layout.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'XMonad') diff --git a/XMonad/Layout.hs b/XMonad/Layout.hs index 2c97a75..0eb1ab5 100644 --- a/XMonad/Layout.hs +++ b/XMonad/Layout.hs @@ -51,9 +51,9 @@ instance LayoutClass Full a -- | The builtin tiling mode of xmonad. Supports 'Shrink', 'Expand' and -- 'IncMasterN'. -data Tall a = Tall !Int -- ^ The default number of windows in the master pane (default: 1) - !Rational -- ^ Default proportion of screen occupied by master pane (default: 1/2) - !Rational -- ^ Percent of screen to increment by when resizing panes (default: 3/100) +data Tall a = Tall { tallNMaster :: !Int -- ^ The default number of windows in the master pane (default: 1) + , tallRatio :: !Rational -- ^ Default proportion of screen occupied by master pane (default: 1/2) + , tallRatioIncrement :: !Rational } -- ^ Percent of screen to increment by when resizing panes (default: 3/100) deriving (Show, Read) -- TODO should be capped [0..1] .. -- cgit v1.2.3