diff --git a/freddy.cabal b/freddy.cabal
--- a/freddy.cabal
+++ b/freddy.cabal
@@ -1,5 +1,5 @@
 name:                freddy
-version:             0.1.1.0
+version:             0.1.2.0
 homepage:            https://github.com/salemove/freddy-hs
 license:             MIT
 license-file:        LICENSE
diff --git a/src/Network/Freddy.hs b/src/Network/Freddy.hs
--- a/src/Network/Freddy.hs
+++ b/src/Network/Freddy.hs
@@ -195,6 +195,7 @@
 
   AMQP.publishMsg (amqpProduceChannel connection) "" (Request.queueName request) msg
   AMQP.publishMsg (amqpProduceChannel connection) topicExchange (Request.queueName request) msg
+  return ()
 
 {-|
   Responds to messages on a given destination. It is useful for messages that
@@ -279,7 +280,9 @@
 sendReply :: AMQP.Message -> AMQP.Channel -> ResultType -> Payload -> IO ()
 sendReply originalMsg channel resType body =
   case buildReply originalMsg resType body of
-    Just (Reply queueName message) -> AMQP.publishMsg channel "" queueName message
+    Just (Reply queueName message) -> do
+      AMQP.publishMsg channel "" queueName message
+      return ()
     Nothing -> putStrLn "Could not reply"
 
 buildReply :: AMQP.Message -> ResultType -> Payload -> Maybe Reply