anchor.diff:               end,
       case Socket of
           fail ->
  -            log:log(warn, "~p Connection failed, drop message ~p",
  +            log:log(warn, "~.0p Connection failed, drop message ~.0p",
                       [pid_groups:my_pidname(), Message]),
               %%reconnect
               set_socket(State, notconnected);
  
positive.code:                 gen_tcp:close(Socket),
                  notconnected;
              {error, timeout} ->
                  log:log(error,"[ CC ] couldn't send to ~p:~p (~p). retrying.",
                          [Address, Port, timeout]),
                  send({Address, Port, Socket}, Pid, Message);
              {error, Reason} ->
                  log:log(error,"[ CC ] couldn't send to ~p:~p (~p). closing connection",
                          [Address, Port, Reason]),
                  gen_tcp:close(Socket),
                  notconnected
  
negative.code:     NewSocket =
          case gen_tcp:send(Socket, BinaryMessage) of
              ok ->
                  ?TRACE("~.0p Sent message ~.0p~n",
                         [pid_groups:my_pidname(), Message]),
                  ?LOG_MESSAGE(Message, byte_size(BinaryMessage)),
                  Socket;
  