diff options
Diffstat (limited to '')
-rw-r--r-- | LayoutHooks.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/LayoutHooks.hs b/LayoutHooks.hs index 2261107..9a4a95d 100644 --- a/LayoutHooks.hs +++ b/LayoutHooks.hs @@ -20,7 +20,7 @@ import Control.Monad.State ( modify ) import XMonad import qualified StackSet as W -install :: (SomeMessage -> X Bool) -> Layout -> Layout +install :: (SomeMessage -> X Bool) -> Layout a -> Layout a install hk lay = lay{ modifyLayout = mod' } where mod' msg = do reinst <- hk msg |