diff options
| author | Don Stewart <dons@galois.com> | 2008-04-03 19:22:46 +0200 |
|---|---|---|
| committer | Don Stewart <dons@galois.com> | 2008-04-03 19:22:46 +0200 |
| commit | fb5002c4b99f1935c491a4fb22ef95455abad9f0 (patch) | |
| tree | f04f5b56e7a3df7deb59740e0446c8fb9124c2e1 | |
| parent | 09e66ff461d1558255fd1c940fd3e1f7c11fdecd (diff) | |
| download | XMonadContrib-fb5002c4b99f1935c491a4fb22ef95455abad9f0.tar.gz XMonadContrib-fb5002c4b99f1935c491a4fb22ef95455abad9f0.tar.xz XMonadContrib-fb5002c4b99f1935c491a4fb22ef95455abad9f0.zip | |
some bang patterns
darcs-hash:20080403172246-cba2c-96d9e37fac0932c3cff10bc2623a163329a2d2a6.gz
Diffstat (limited to '')
| -rw-r--r-- | XMonad/Layout/ThreeColumns.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Layout/ThreeColumns.hs b/XMonad/Layout/ThreeColumns.hs index d95d468..188bce9 100644 --- a/XMonad/Layout/ThreeColumns.hs +++ b/XMonad/Layout/ThreeColumns.hs @@ -41,7 +41,7 @@ import Control.Monad -- -- "XMonad.Doc.Extending#Editing_the_layout_hook" -data ThreeCol a = ThreeCol Int Rational Rational deriving (Show,Read) +data ThreeCol a = ThreeCol !Int !Rational !Rational deriving (Show,Read) instance LayoutClass ThreeCol a where doLayout (ThreeCol nmaster _ frac) r = |