From ed0f54533903d4bcd4dfcd12fc2fe54a7f21cdda Mon Sep 17 00:00:00 2001 From: Don Stewart Date: Sun, 13 Apr 2008 08:59:58 +0200 Subject: strictify some fields darcs-hash:20080413065958-cba2c-f266364bfe708c277aae50213f97f4a7ea979bc5.gz --- XMonad/Layout/HintedTile.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'XMonad') diff --git a/XMonad/Layout/HintedTile.hs b/XMonad/Layout/HintedTile.hs index 34f0898..4266cfc 100644 --- a/XMonad/Layout/HintedTile.hs +++ b/XMonad/Layout/HintedTile.hs @@ -40,10 +40,10 @@ import Control.Monad -- "XMonad.Doc.Extending#Editing_the_layout_hook" data HintedTile a = HintedTile - { nmaster :: Int - , delta, frac :: Rational - , alignment :: Alignment - , orientation :: Orientation + { nmaster :: !Int + , delta, frac :: !Rational + , alignment :: !Alignment + , orientation :: !Orientation } deriving ( Show, Read ) data Orientation = Wide | Tall -- cgit v1.2.3