diff --git a/source/Network/Xmpp/Concurrent.hs b/source/Network/Xmpp/Concurrent.hs
index 124409f..3841ad7 100644
--- a/source/Network/Xmpp/Concurrent.hs
+++ b/source/Network/Xmpp/Concurrent.hs
@@ -172,8 +172,8 @@ newSession stream config realm mbSasl = runErrorT $ do
     (sStanza, ps) <- initPlugins out $ plugins config
     let stanzaHandler = runHandlers $ List.concat
                         [ inHandler <$> ps
-                        , [ toChan stanzaChan out
-                          , handleIQ iqHands out
+                        , [ toChan stanzaChan sStanza
+                          , handleIQ iqHands sStanza
                           ]
                         , rosterH
                         ]