diff --git a/Database/MongoDB/Queue.hs b/Database/MongoDB/Queue.hs
--- a/Database/MongoDB/Queue.hs
+++ b/Database/MongoDB/Queue.hs
@@ -106,8 +106,9 @@
 createTailBroker = mkTailBroker def
 
 -- | same as createTailBroker, but uses a polling technique instead of tailable cursors
+-- Use default settings and poll with a 10 ms delay
 createPollBroker :: (MonadIO m, Applicative m) => Action m PollBroker
-createPollBroker = mkPollBroker def 100
+createPollBroker = mkPollBroker def (10 * 10000)
 
 -- | create a tailable cursor worker with non-default configuration
 mkTailBroker :: (MonadIO m, Applicative m) => WorkerOpts -> Action m TailBroker
diff --git a/mongodb-queue.cabal b/mongodb-queue.cabal
--- a/mongodb-queue.cabal
+++ b/mongodb-queue.cabal
@@ -1,5 +1,5 @@
 name:                mongodb-queue
-version:             0.4
+version:             0.4.0.1
 synopsis:            message queue using MongoDB
 description:         A simple messaging queue using MongoDB. This trades having a good queue for ease of deployment. This is designed to be much worse at scale than real queueing infrastructure. However, it is very simple to start using if you are already running MongoDB. You could probably fork this code to make it work with a different database that you are already using.
                      .