diff --git a/backplane-server.lisp b/backplane-server.lisp
index b441143..39a9cb7 100644
--- a/backplane-server.lisp
+++ b/backplane-server.lisp
@@ -98,9 +98,6 @@
                   forms
                   :initial-value init)))))
 
-(defun echo-through (obj &optional msg)
-  (format t "~A: ~S" msg obj))
-
 (defmethod xmpp:handle ((conn xmpp:connection) (message xmpp:message))
   (let ((sender (xmpp:from message)))
     (format *standard-output* "message received from ~A" sender)
@@ -110,8 +107,7 @@
                                             (xmpp:body)
                                             (decode-message)
                                             (dispatch-parse-message sender)
-                                            (handle-message)
-                                            (echo-through "RESPONSE"))))))
+                                            (handle-message))))))
 
 (let ((backplane nil))
   (defun backplane-connect (xmpp-host xmpp-username xmpp-password)