aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndrea Rossato <andrea.rossato@unibz.it>2008-01-15 05:51:39 +0100
committerAndrea Rossato <andrea.rossato@unibz.it>2008-01-15 05:51:39 +0100
commit83e01e9718177e4dce65771268346ee6946e7d99 (patch)
treeed7e799b2b6fd55492d90b708c2b24551c54053a
parentd7d8a1a945a0a445d298ba2c46d42636bed2e842 (diff)
downloadXMonadContrib-83e01e9718177e4dce65771268346ee6946e7d99.tar.gz
XMonadContrib-83e01e9718177e4dce65771268346ee6946e7d99.tar.xz
XMonadContrib-83e01e9718177e4dce65771268346ee6946e7d99.zip
Layout.ShowWName: generalize the instance
darcs-hash:20080115045139-32816-93d380b259da4298972a60e3039b7af752626a6b.gz
-rw-r--r--XMonad/Layout/ShowWName.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/XMonad/Layout/ShowWName.hs b/XMonad/Layout/ShowWName.hs
index 7d3f636..50956e0 100644
--- a/XMonad/Layout/ShowWName.hs
+++ b/XMonad/Layout/ShowWName.hs
@@ -1,4 +1,4 @@
-{-# LANGUAGE PatternGuards, TypeSynonymInstances, MultiParamTypeClasses #-}
+{-# LANGUAGE PatternGuards, FlexibleInstances, MultiParamTypeClasses #-}
-----------------------------------------------------------------------------
-- |
-- Module : XMonad.Layout.ShowWName
@@ -67,7 +67,7 @@ defaultSWNConfig =
, swn_fade = 1
}
-instance LayoutModifier ShowWName Window where
+instance LayoutModifier ShowWName a where
redoLayout (SWN True c (Just (_,w))) r _ wrs = deleteWindow w >> flashName c r wrs
redoLayout (SWN True c Nothing ) r _ wrs = flashName c r wrs
redoLayout (SWN False _ _ ) _ _ wrs = return (wrs, Nothing)