anchor.diff:                      Socket;
                   {error, Reason} ->
                       % note: this should not occur since the socket was just created with 'ok'
  -                    log:log(error,"[ CC ~p ] reconnect to ~.0p because socket is ~.0p",
  -                            [self(), Address, Reason]),
  +                    log:log(error,"[ CC ~p (~p) ] reconnect because socket is ~.0p",
  +                            [self(), pid_groups:my_pidname(), Reason]),
                       gen_tcp:close(Socket),
                       new_connection(Address, Port, MyPort, Channel)
               end;
           {error, Reason} ->
  -            log:log(info,"[ CC ~p ] couldn't connect to ~.0p:~.0p (~.0p)",
  -                    [self(), Address, Port, Reason]),
  +            log:log(info,"[ CC ~p (~p) ] couldn't connect (~.0p)",
  +                    [self(), pid_groups:my_pidname(), Reason]),
               fail
       end.
   
  
positive.code:     send_bundle_if_ready(NewState);
  
  on({tcp_closed, Socket}, State) ->
      log:log(warn,"[ CC ~p ] tcp closed info", [self()]),
      close_connection(Socket, State);
  
  on({tcp_error, Socket, Reason}, State) ->
      % example Reason: etimedout, ehostunreach 
      log:log(warn,"[ CC ~p ] tcp_error: ~p", [self(), Reason]),
      %% may fail, when tcp just closed
      _ = inet:setopts(Socket, [{active, once}]),
      send_bundle_if_ready(State);
  
negative.code:             case whereis(Process) of
                  undefined ->
                      log:log(warn,
                              "[ CC ~p (~p) ] Cannot accept msg for unknown named"
                                  " process ~p: ~.0p~n",
                              [self(), pid_groups:my_pidname(), Process, Message]);
                  PID -> comm:send_local(PID, Message), ok
              end
      end.
  