From bae0fedfce838edd85637fa3a0a7f3a1ee5f17b5 Mon Sep 17 00:00:00 2001
From: Joachim Breitner <mail@joachim-breitner.de>
Date: Wed, 8 Oct 2008 17:42:45 +0200
Subject: pointWithin has moved to the core

darcs-hash:20081008154245-23c07-30a58c257a61f3be5d001f238e6989e02c8b84c6.gz
---
 XMonad/Actions/UpdatePointer.hs | 6 ------
 1 file changed, 6 deletions(-)

(limited to 'XMonad/Actions/UpdatePointer.hs')

diff --git a/XMonad/Actions/UpdatePointer.hs b/XMonad/Actions/UpdatePointer.hs
index 1caf3c2..d66f1a4 100644
--- a/XMonad/Actions/UpdatePointer.hs
+++ b/XMonad/Actions/UpdatePointer.hs
@@ -90,12 +90,6 @@ moveWithin now lower upper =
          then upper
          else now
 
-pointWithin :: Position -> Position -> Rectangle -> Bool
-pointWithin x y r = x >= rect_x r &&
-		    x <  rect_x r + fi (rect_width r) &&
-		    y >= rect_y r &&
-		    y <  rect_y r + fi (rect_height r)
-
 fi :: (Num b, Integral a) => a -> b
 fi = fromIntegral 
 
-- 
cgit v1.2.3