diff options
| -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 = |