1 files changed, 2 insertions, 9 deletions
diff --git a/XMonad/Prompt.hs b/XMonad/Prompt.hs
index 16e568a..a84decc 100644
--- a/XMonad/Prompt.hs
+++ b/XMonad/Prompt.hs
@@ -63,12 +63,13 @@ module XMonad.Prompt
 
 import Prelude hiding (catch)
 
-import XMonad  hiding (config, io, numlockMask, cleanMask)
+import XMonad  hiding (config, numlockMask, cleanMask)
 import qualified XMonad as X (numlockMask,config)
 import qualified XMonad.StackSet as W
 import XMonad.Util.Font
 import XMonad.Util.Types
 import XMonad.Util.XSelection (getSelection)
+import XMonad.Util.XUtils (fi)
 
 import Control.Arrow ((&&&),first)
 import Control.Concurrent (threadDelay)
@@ -826,14 +827,6 @@ getNextCompletion c l = l !! idx
                   Just i  -> if i >= length l - 1 then 0 else i + 1
                   Nothing -> 0
 
--- Lift an IO action into the XP
-io :: IO a -> XP a
-io = liftIO
-
--- Shorthand for fromIntegral
-fi :: (Num b, Integral a) => a -> b
-fi = fromIntegral
-
 -- | Given a maximum length, splits a list into sublists
 splitInSubListsAt :: Int -> [a] -> [[a]]
 splitInSubListsAt _ [] = []