aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Util/Image.hs
diff options
context:
space:
mode:
Diffstat (limited to 'XMonad/Util/Image.hs')
-rw-r--r--XMonad/Util/Image.hs5
1 files changed, 4 insertions, 1 deletions
diff --git a/XMonad/Util/Image.hs b/XMonad/Util/Image.hs
index 92ef76c..472586f 100644
--- a/XMonad/Util/Image.hs
+++ b/XMonad/Util/Image.hs
@@ -17,7 +17,9 @@ module XMonad.Util.Image
-- $usage
Placement(..),
iconPosition,
- drawIcon
+ drawIcon,
+
+ fi,
) where
import XMonad
@@ -86,6 +88,7 @@ drawIcon dpy drw gc fc bc x y icon = do
io $ setForeground dpy gc fcolor
io $ drawPoints dpy drw gc (movePoints x y (iconToPoints icon)) coordModeOrigin
+
-- | Short-hand for 'fromIntegral'
fi :: (Integral a, Num b) => a -> b
fi = fromIntegral