1 files changed, 0 insertions, 4 deletions
diff --git a/Warp.hs b/Warp.hs
index f18b96b..adf679e 100644
--- a/Warp.hs
+++ b/Warp.hs
@@ -21,7 +21,6 @@ module XMonadContrib.Warp (
                           ) where
 
 import Data.Ratio
-import Data.Maybe
 import Data.List
 import Control.Monad.RWS
 import Graphics.X11.Xlib
@@ -55,9 +54,6 @@ Note that warping to a particular screen may change the focus.
 fraction :: (Integral a, Integral b) => Rational -> a -> b
 fraction f x = floor (f * fromIntegral x)
 
-ix :: Int -> [a] -> Maybe a
-ix n = listToMaybe . take 1 . drop n
-
 warp :: Window -> Position -> Position -> X ()
 warp w x y = withDisplay $ \d -> io $ warpPointer d none w 0 0 0 0 x y