diff --git a/changelog.md b/changelog.md
--- a/changelog.md
+++ b/changelog.md
@@ -1,3 +1,10 @@
+2009.5.13
+---------
+
+### Fix
+
+* use lighter mps for minimal dependency
+
 2009.4.52.2
 -----------
 
diff --git a/hack-contrib.cabal b/hack-contrib.cabal
--- a/hack-contrib.cabal
+++ b/hack-contrib.cabal
@@ -1,5 +1,5 @@
 Name:                 hack-contrib
-Version:              2009.4.52.2
+Version:              2009.5.13
 Build-type:           Simple
 Synopsis:             Hack contrib
 Description:          Hack contrib
@@ -15,7 +15,7 @@
 
 library
   ghc-options: -Wall
-  build-depends: base, cgi, network, haskell98, old-locale, old-time, directory, filepath, containers, bytestring, ansi-wl-pprint, mps >= 2009.4.50, data-default >= 0.2, ansi-wl-pprint, unix, time, pureMD5, hack >= 2009.4.52
+  build-depends: base, cgi, network, haskell98, old-locale, old-time, directory, filepath, containers, bytestring, ansi-wl-pprint, data-default >= 0.2, ansi-wl-pprint, unix, time, pureMD5, mps >= 2009.5.13, hack >= 2009.4.52
   hs-source-dirs: src/
   exposed-modules:  
                     Hack.Contrib.Utils
diff --git a/src/Hack/Contrib/Middleware/ETag.hs b/src/Hack/Contrib/Middleware/ETag.hs
--- a/src/Hack/Contrib/Middleware/ETag.hs
+++ b/src/Hack/Contrib/Middleware/ETag.hs
@@ -4,7 +4,6 @@
 module Hack.Contrib.Middleware.ETag (etag) where
 
 import Hack
-import Hack.Contrib.Utils
 import Hack.Contrib.Response
 import Hack.Contrib.Constants
 
diff --git a/src/Hack/Contrib/Middleware/Hub.hs b/src/Hack/Contrib/Middleware/Hub.hs
--- a/src/Hack/Contrib/Middleware/Hub.hs
+++ b/src/Hack/Contrib/Middleware/Hub.hs
@@ -5,8 +5,6 @@
 
 module Hack.Contrib.Middleware.Hub where
 
-import Hack.Contrib.Utils
-
 import MPSUTF8
 import Prelude hiding ((.), (^), (>), (+))
 
diff --git a/src/Hack/Contrib/Middleware/RawRouter.hs b/src/Hack/Contrib/Middleware/RawRouter.hs
--- a/src/Hack/Contrib/Middleware/RawRouter.hs
+++ b/src/Hack/Contrib/Middleware/RawRouter.hs
@@ -1,7 +1,6 @@
 module Hack.Contrib.Middleware.RawRouter (route) where
 
 import Hack
-import Hack.Contrib.Utils
 import Hack.Contrib.Request hiding (path)
 
 import MPSUTF8
diff --git a/src/Hack/Contrib/Middleware/SimpleRouter.hs b/src/Hack/Contrib/Middleware/SimpleRouter.hs
--- a/src/Hack/Contrib/Middleware/SimpleRouter.hs
+++ b/src/Hack/Contrib/Middleware/SimpleRouter.hs
@@ -15,7 +15,6 @@
 module Hack.Contrib.Middleware.SimpleRouter (route) where
 
 import Hack
-import Hack.Contrib.Utils
 
 import MPSUTF8
 import Prelude hiding ((.), (^), (>))
diff --git a/src/Hack/Contrib/Utils.hs b/src/Hack/Contrib/Utils.hs
--- a/src/Hack/Contrib/Utils.hs
+++ b/src/Hack/Contrib/Utils.hs
@@ -12,28 +12,16 @@
 import Network.URI hiding (path)
 import Data.Default
 
-import Control.Arrow ((>>>), (<<<))
+import Control.Arrow ((<<<))
 import qualified Data.Map as M
 import Data.Time
 import Control.Monad (mplus, MonadPlus)
 import Data.Maybe
-import System.IO
-import System.FilePath ((</>))
-import Control.Category (Category)
 import Data.List (lookup)
 
-
-(>) :: (Control.Category.Category cat) => cat a b -> cat b c -> cat a c
-(>) = (>>>)
-infixl 8 >
-
 (+) :: (MonadPlus m) => m a -> m a -> m a
 (+) = mplus
 infixl 8 +
-
-(/) :: FilePath -> FilePath -> FilePath
-(/) = (</>)
-infixl 5 /
 
 empty_app :: Application
 empty_app = return def