diff --git a/README b/README
--- a/README
+++ b/README
@@ -8,6 +8,11 @@
 Changelog
 ---------
 
+epoll-0.2.1
+
+Changed call to c_epoll_create to pass in 1 instead of 0. Thanks to Aycan
+Irican.
+
 epoll-0.2
 
 Added EventLoop and Buffer layer which abstract from the low level bindings
diff --git a/epoll.cabal b/epoll.cabal
--- a/epoll.cabal
+++ b/epoll.cabal
@@ -1,5 +1,5 @@
 name:               epoll
-version:            0.2
+version:            0.2.1
 synopsis:           epoll bindings
 description:        Bindings to epoll, a Linux specific I/O
                     event notication facility (cf. man epoll(7)).
@@ -26,6 +26,6 @@
   extensions:       CPP,
                     ForeignFunctionInterface,
                     TypeSynonymInstances
-  build-depends:    base >= 3 && < 5, unix, mtl
+  build-depends:    base >= 3 && < 5, unix
   hs-source-dirs:   src
 
diff --git a/src/System/Linux/Epoll/Base.hsc b/src/System/Linux/Epoll/Base.hsc
--- a/src/System/Linux/Epoll/Base.hsc
+++ b/src/System/Linux/Epoll/Base.hsc
@@ -149,7 +149,7 @@
 -- single call to 'wait'.
 create :: Size -> IO Device
 create s = do
-    dev <- throwErrnoIfMinus1 "create: c_epoll_create" (c_epoll_create 0)
+    dev <- throwErrnoIfMinus1 "create: c_epoll_create" (c_epoll_create 1)
     buf <- mallocArray (fromIntegral $ fromSize s)
     installHandler sigPIPE Ignore Nothing
     return $ Device (Fd dev) buf s