cleanup SEND output

diff --git a/scripts/mqr-xmpp-client.pl b/scripts/mqr-xmpp-client.pl
index 0d98860..63ce4d1 100755 (executable)
--- a/scripts/mqr-xmpp-client.pl
+++ b/scripts/mqr-xmpp-client.pl
@@ -67,7 +67,7 @@ MQR::Redis->redis->psubscribe( "SEND $jid *", sub {
        Encode::_utf8_on($body);
 
        my ( undef, $gw, $type, $user, $to ) = split(/\s/, $channel);
-       warn "# send ", dump( $jid, $type, $to, $user, $body );
+       warn "SEND $jid $type $to <$user> $body\n";
        $cl->send_message( "<$user> $body", $to => $jid, $type );
 });