diff --git a/README.org b/README.org
--- a/README.org
+++ b/README.org
@@ -51,7 +51,7 @@
           exchange'   = "myExchange"
           routingKey  = "myKey"
 
-      _ <- runAmqp $ \(_, chan) -> do
+      _ <- runAmqp $ \_ chan -> do
           _ <- declareQueue chan newQueue {queueName = serverQueue}
 
           declareExchange chan newExchange { exchangeName = exchange'
diff --git a/snaplet-amqp.cabal b/snaplet-amqp.cabal
--- a/snaplet-amqp.cabal
+++ b/snaplet-amqp.cabal
@@ -1,5 +1,5 @@
 Name:                snaplet-amqp
-Version:             1.0.1.1
+Version:             1.0.1.2
 Synopsis:            Snap framework snaplet for the AMQP library
 Homepage:            https://github.com/ixmatus/snaplet-amqp
 License:             BSD3
@@ -16,6 +16,9 @@
 Cabal-version:       >=1.14.0
 
 description:
+
+  <<https://travis-ci.org/ixmatus/snaplet-amqp.svg?branch=master>>
+  .
   `snaplet-amqp` is a snaplet for the Snap web framework providing
   convenience functions and state management for the Haskell AMQP
   package.