diff options
author | Don Stewart <dons@galois.com> | 2008-04-13 08:59:58 +0200 |
---|---|---|
committer | Don Stewart <dons@galois.com> | 2008-04-13 08:59:58 +0200 |
commit | ed0f54533903d4bcd4dfcd12fc2fe54a7f21cdda (patch) | |
tree | ae9bb92355b3b9efe23175abe3ba359ba654fa4a | |
parent | 08aa4d905be63d7de87808f5ae0dec88e1a870d0 (diff) | |
download | XMonadContrib-ed0f54533903d4bcd4dfcd12fc2fe54a7f21cdda.tar.gz XMonadContrib-ed0f54533903d4bcd4dfcd12fc2fe54a7f21cdda.tar.xz XMonadContrib-ed0f54533903d4bcd4dfcd12fc2fe54a7f21cdda.zip |
strictify some fields
darcs-hash:20080413065958-cba2c-f266364bfe708c277aae50213f97f4a7ea979bc5.gz
-rw-r--r-- | XMonad/Layout/HintedTile.hs | 8 |
1 files changed, 4 insertions, 4 deletions
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 |