mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-07-31 20:21:51 -07:00
some bang patterns
This commit is contained in:
@@ -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 =
|
||||
|
Reference in New Issue
Block a user