aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Layout/ShowWName.hs
diff options
context:
space:
mode:
authorAndrea Rossato <andrea.rossato@unibz.it>2008-01-24 14:47:25 +0100
committerAndrea Rossato <andrea.rossato@unibz.it>2008-01-24 14:47:25 +0100
commite981e32f3644c900ab35bfe05ce9971523fb545c (patch)
tree5065939468770eda02bf0eb34e9e7fa4287818b7 /XMonad/Layout/ShowWName.hs
parente63d7c9d44b598a2bdc9e11aade6cc33c3ef17e3 (diff)
downloadXMonadContrib-e981e32f3644c900ab35bfe05ce9971523fb545c.tar.gz
XMonadContrib-e981e32f3644c900ab35bfe05ce9971523fb545c.tar.xz
XMonadContrib-e981e32f3644c900ab35bfe05ce9971523fb545c.zip
ShowWName: moved fi to XUtils
darcs-hash:20080124134725-32816-305f741221c5602147daed2798a2c0b28fe3a850.gz
Diffstat (limited to 'XMonad/Layout/ShowWName.hs')
-rw-r--r--XMonad/Layout/ShowWName.hs4
1 files changed, 0 insertions, 4 deletions
diff --git a/XMonad/Layout/ShowWName.hs b/XMonad/Layout/ShowWName.hs
index 50956e0..2c0b6be 100644
--- a/XMonad/Layout/ShowWName.hs
+++ b/XMonad/Layout/ShowWName.hs
@@ -98,7 +98,3 @@ flashName c (Rectangle _ _ wh ht) wrs = do
io $ sync d False
i <- startTimer (swn_fade c)
return (wrs, Just $ SWN False c $ Just (i,w))
-
--- | Short-hand for 'fromIntegral'
-fi :: (Integral a, Num b) => a -> b
-fi = fromIntegral