2 files changed, 4 insertions, 4 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
diff --git a/XMonad/Util/XUtils.hs b/XMonad/Util/XUtils.hs
index acc4558..8ea3653 100644
--- a/XMonad/Util/XUtils.hs
+++ b/XMonad/Util/XUtils.hs
@@ -204,6 +204,3 @@ mkWindow d s rw x y w h p o = do
            createWindow d rw x y w h 0 (defaultDepthOfScreen s)
                         inputOutput visual attrmask attributes
 
--- | Short-hand for 'fromIntegral'
-fi :: (Integral a, Num b) => a -> b
-fi = fromIntegral